OVH Cloud OVH Cloud

Colonne d'activeCell

6 réponses
Avatar
ManBas
Bonjour les amis du web,
Toujours dans des codes basiques, je ne parviens pas à exprimer: "si la
colonne de activecell n'est pas la colonne A alors..."
avec mon code
If Columns(ActiveCell.Column) <> Columns("a:a") Then
Pouvez-vous corriger mon erreur SVP?
Merci infiniment.

6 réponses

Avatar
AV
If Columns(ActiveCell.Column) <> Columns("a:a") Then
Pouvez-vous corriger mon erreur SVP?


If ActiveCell.Column <> 1 Then..

AV

Avatar
Jacky
Bonjour

Peut-être que
'--------
If ActiveCell.Column <> 1 Then .......
'---------

Salutations
JJ

"ManBas" a écrit dans le message de
news:uSkeY%
Bonjour les amis du web,
Toujours dans des codes basiques, je ne parviens pas à exprimer: "si la
colonne de activecell n'est pas la colonne A alors..."
avec mon code
If Columns(ActiveCell.Column) <> Columns("a:a") Then
Pouvez-vous corriger mon erreur SVP?
Merci infiniment.




Avatar
jps
bonjour manbas
peut-être ceci :

Sub test()
If ActiveCell.Column <> 1 Then
MsgBox "me goure-je?"
End If
End Sub

HTH
jps

"ManBas" a écrit dans le message de
news:uSkeY%
Bonjour les amis du web,
Toujours dans des codes basiques, je ne parviens pas à exprimer: "si la
colonne de activecell n'est pas la colonne A alors..."
avec mon code
If Columns(ActiveCell.Column) <> Columns("a:a") Then
Pouvez-vous corriger mon erreur SVP?
Merci infiniment.




Avatar
Jacky
Bonjour Jp,Av
MsgBox "me goure-je?"
Alors, jette

Comme je fais du jardinage le WE en ce moment.
;o))
JJ

"jps" <enlevezd' a écrit dans le message de
news:
bonjour manbas
peut-être ceci :

Sub test()
If ActiveCell.Column <> 1 Then
MsgBox "me goure-je?"
End If
End Sub

HTH
jps

"ManBas" a écrit dans le message de
news:uSkeY%
Bonjour les amis du web,
Toujours dans des codes basiques, je ne parviens pas à exprimer: "si
la


colonne de activecell n'est pas la colonne A alors..."
avec mon code
If Columns(ActiveCell.Column) <> Columns("a:a") Then
Pouvez-vous corriger mon erreur SVP?
Merci infiniment.







Avatar
jps
ouais, jacky, et où nous irons, les potes....
jps

"Jacky" a écrit dans le message de
news:
Bonjour Jp,Av
MsgBox "me goure-je?"
Alors, jette

Comme je fais du jardinage le WE en ce moment.
;o))
JJ

"jps" <enlevezd' a écrit dans le message de
news:
bonjour manbas
peut-être ceci :

Sub test()
If ActiveCell.Column <> 1 Then
MsgBox "me goure-je?"
End If
End Sub

HTH
jps

"ManBas" a écrit dans le message de
news:uSkeY%
Bonjour les amis du web,
Toujours dans des codes basiques, je ne parviens pas à exprimer: "si
la


colonne de activecell n'est pas la colonne A alors..."
avec mon code
If Columns(ActiveCell.Column) <> Columns("a:a") Then
Pouvez-vous corriger mon erreur SVP?
Merci infiniment.











Avatar
ManBas
Merci à vous tous.
Comme souvent, la solution est à portée de main, et je me dis "quel c.. je
suis" ...mais je progresse dans XL, et pas mal même, si, si!
A bientôt.
"jps" <enlevezd' a écrit dans le message de news:

bonjour manbas
peut-être ceci :

Sub test()
If ActiveCell.Column <> 1 Then
MsgBox "me goure-je?"
End If
End Sub

HTH
jps

"ManBas" a écrit dans le message de
news:uSkeY%
Bonjour les amis du web,
Toujours dans des codes basiques, je ne parviens pas à exprimer: "si la
colonne de activecell n'est pas la colonne A alors..."
avec mon code
If Columns(ActiveCell.Column) <> Columns("a:a") Then
Pouvez-vous corriger mon erreur SVP?
Merci infiniment.