Concaténation VBA et if
Bonjour,
Je suis un programmateur autodidacte en VBA. Je souhaiterais faire apparaître un commentaire dans une cellule en fonction de la valeur de la cellule voisine.
Je sais qu'il est possible de le faire de multiple façon mais je tiens absolument à le faire en codant la fonction If. Voici le code que j'utilise. Quelqu'un sait-il comment positionner les guillemets dans le 1er argument de la fonction if
Sub ElIf()
Dim n As Integer
For n = 2 To 23
Worksheets("Voyage").Range("K" & n).Select
ActiveCell.Formula = "=IF(f & n <500,""pas cher"",""cher"")"
Next n
End Sub
Je suis un programmateur autodidacte en VBA. Je souhaiterais faire apparaître un commentaire dans une cellule en fonction de la valeur de la cellule voisine.
Je sais qu'il est possible de le faire de multiple façon mais je tiens absolument à le faire en codant la fonction If. Voici le code que j'utilise. Quelqu'un sait-il comment positionner les guillemets dans le 1er argument de la fonction if
Sub ElIf()
Dim n As Integer
For n = 2 To 23
Worksheets("Voyage").Range("K" & n).Select
ActiveCell.Formula = "=IF(f & n <500,""pas cher"",""cher"")"
Next n
End Sub
2 réponses
-
Bonjour,
Sub ElIf() Dim n As Integer For n = 2 To 23 Worksheets("Voyage").Range("K" & n).Formula = _ "=IF(F" & n & "<500,""pas cher"",""cher"")" Next n End Sub
-
Merci énormément Patrice. J'avais essayé des dizaines de combinaisons différentes pour placer les guillemets mais jamais je n'aurai pensé à celle-là.
Du coup, ça me sera très utile pour rédiger la syntaxe de mes autres formules ^_^
Thierry
