Convertir adresse de Cells en Range - VB/VBA/VBS - Programmation
Marsh Posté le 18-07-2007 à 17:33:09
D'après la documentation, on devrait pouvoir écrire :
Range(Cells(i, k))
Mais j'ai constaté que si on ne précise pas quelle cellule finit la plage, ça déclenche une erreur. C'est peut-être lié aux différents paramètres Excel d'adressage des cellules, je ne sais pas, mais je te conseille cette syntaxe :
Range(Cells(i, k), Cells(i, k))
Marsh Posté le 18-07-2007 à 18:23:18
Bonsoir,
strad = Cells(i, k).Address(RowAbsolute:=False, ColumnAbsolute:=False)
Range(strad).activate
If Not ActiveCell.Comment Is Nothing Then ActiveCell.Comment.Delete
With Worksheets("MIGRE" ).AddComment
.Visible = False
.Text etc...
Cordialement
Marsh Posté le 18-07-2007 à 16:33:39
Bonjour,
j'ai un petit probleme et ça me prend graaaave la tete, c'est vraiment tout bete.
Je veux ajouter un comment à une cellule mais j'ai la reference en numérique i et k(1 et 1 au lieu de A1 par exemple) , je souhaiterai pouvoir convertir cette reference
en A1, y'a t'il une fonction ou une astuce car je craque de bloquer sur un si petit probleme.
Voici le code exemple ça bloque à la premiere ligne.
Message édité par dapit le 18-07-2007 à 16:38:08