[Excel VB] - Calcolo e visualizzazione

[likioti687]

salve

questo è il mio codice (sono alle prime armi :P)

Private Sub Worksheet_Active(ByVal Target As Range)
If Cells("d42").Value = "€5,50" Then
    ActiveCell.FormulaR1C1 = "=a42*10"
    Else
    
End If
End Sub

in pratica vorrei ke se la cella D42 è uguale 5,50 allora I42=A42*10, visualizzabile sulla cella I42! grazie in anticipo

[gibra]

Quindi ?
Qual'è il tuo problema?

[Kej]

Forse il problema è Cells("d42").value = .....
La funzione Cells richiede due argomenti di tipo intero, riga e colonna.

Cells("d42").value dovrebbe essere corretto in Cells(4, 42).value

[likioti687]

Originariamente inviato da Kej
Forse il problema è Cells("d42").value = .....
La funzione Cells richiede due argomenti di tipo intero, riga e colonna.

Cells("d42").value dovrebbe essere corretto in Cells(4, 42).value

ok