Erruer de code avec la fonction ln
pat redoue
Messages postés
11
Statut
Membre
-
algoplus -
algoplus -
Bonjour,
je n'arrive pas a ecrei cettre ligne de code correctement au secours!!!!!!!!
dim i as integer
For i = 1 To 10
Rows(i).Cells(10) = "= Ln( rows(i).Cells(9) / rows(i+1).Cells(9) )"
Next i
End Sub
je n'arrive pas a ecrei cettre ligne de code correctement au secours!!!!!!!!
dim i as integer
For i = 1 To 10
Rows(i).Cells(10) = "= Ln( rows(i).Cells(9) / rows(i+1).Cells(9) )"
Next i
End Sub
Configuration: Windows XP Internet Explorer 6.0
A voir également:
- Erruer de code avec la fonction ln
- Code ascii - Guide
- Fonction si ou - Guide
- Code activation windows 10 - Guide
- Code puk bloqué - Guide
- Code de déverrouillage oublié - Guide
2 réponses
Si tu tiens a conserver ton code, cells(i,j) définit les coordonnées d'une cellule, pas besoin de définir la ligne:
dim i as integer
For i = 1 To 10
Cells(i,10) = "= Ln(Cells(i,9) / Cells(i+1,9) )"
Next i
End Sub
dim i as integer
For i = 1 To 10
Cells(i,10) = "= Ln(Cells(i,9) / Cells(i+1,9) )"
Next i
End Sub
Bonjour Pat,
pas besoin de t'embêter avec ton Rows(i+1).Cells(9) et tout le tintouin
le plus simple est de lancer l'enregistrement automatique de macros, d'écrire ta formule dans Excel (avec adressage relatif) et de voir ensuite la transcription en VBA.
Ca donne
I.
pas besoin de t'embêter avec ton Rows(i+1).Cells(9) et tout le tintouin
le plus simple est de lancer l'enregistrement automatique de macros, d'écrire ta formule dans Excel (avec adressage relatif) et de voir ensuite la transcription en VBA.
Ca donne
Rows(i).Cells(10).FormulaR1C1 = "=LN(RC[-1]/R[1]C[-1])"
I.