Se utilizzo le Formule e scrivo per esempio nella cella A2 la formula =A1 se il contenuto della cella è un Numero va tutto OK! ma se il volore della cella è una stringa non funziona, quindi dove commetto l'errore.


Moderatori: Anthony47, Flash30005
Sub TrovaLaPrimoCampoTabella()
Selection.HomeKey Unit:=wdStory
For i = 1 To ActiveDocument.Tables.Count
If ActiveDocument.Tables(i).Style = "Griglia tabella" Then
Selection.EndKey Unit:=wdLine, Extend:=wdExtend
Selection.Copy
Selection.MoveDown Unit:=wdLine, Count:=1 '<<<< con altri spostamenti puoi andare dove vuoi
Selection.PasteAndFormat (wdPasteDefault)
End If
Next i
End Sub
Sub CopiaTesto1
ActiveDocument.FormFields("Testo2").Result = ActiveDocument.FormFields("testo1").Result
End Sub
Torna a Applicazioni Office Windows
Inserimento parziale valore cella in MessageBox Autore: Ricky0185 |
Forum: Applicazioni Office Windows Risposte: 6 |
Aggiornare cella con somma quando aggiungo nuova colonna Autore: marcopont |
Forum: Applicazioni Office Windows Risposte: 1 |
sal vare doc in word in PDF editabile Autore: danibi60 |
Forum: Applicazioni Office Windows Risposte: 2 |
inserisci valore in celle a seguito di condizione Autore: ucame |
Forum: Applicazioni Office Windows Risposte: 10 |
Visitano il forum: Nessuno e 19 ospiti