Una famiglia di software per fogli di calcolo Microsoft con strumenti per l'analisi, la creazione di grafici e la comunicazione dei dati.
Buongiorno!
Il mio problema oggi è il seguente:
For j=1 to 10
TWs.Range("A" & j).Formula = "=CERCA.VERT($B$j;'............)"
Next j
con TWs=ThisWorksheet ottengo errore 1004.
Molto meglio se il codice segue quello che faresti in Excel lato celle:
Prova a registrare ina macro che:
- seleziona la prima cella che contiene la formula
- quindi trascina verso il basso
- modifica poi per il tuo contesto
Per ciò che riguarda il CERCA.VERT() Formula richiederebbe la formula in inglese:
TWs.Formula = "=VLOOKUP( ecc....'
Per l'errore: sicuro di scrivere:
Dim TWs As Worksheet
Set TWs = ThisWorkbook.Worksheets("NomeDelFoglio")
Vedi: