Bonsoir à toutes et à tous
Encore et toujours besoin de votre aide
J'essaye de faire fonctionner ce bout de macro,
et pour tourner, ça tourne, mais impossible de
trouver
comment l'arrêter.
Le but à obtenir, c'est de rendre la première
cellule de ma ligne R4:GG4 vide, cellule active.
suis en train de m'eméler les crayons avec For et
Next depuis un bout de temps, je n'y arrive plus
du tout. Il doit y avoir un blème pour sortir de
la boucle quand la cellule vide est trouvée, mais
lequel...???
Help me Please...
Sub celvide()
Dim c As Range
Range("R4:GG4").Select
For Each c In Selection
If c = "" Then
c.Select
End If
c.Offset(0, 1).Select
Next c
'suite macro.......
--
Amicalement
Michel . P
(un jour, serai Calife à la place du Calife...)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Eric
Bonjour Michel
en mettant Exit Sub, non ?
If c = "" Then c.Select Exit Sub End If
A+ Eric
Michel.P écrivait news::
Bonsoir à toutes et à tous Encore et toujours besoin de votre aide J'essaye de faire fonctionner ce bout de macro, et pour tourner, ça tourne, mais impossible de trouver comment l'arrêter. Le but à obtenir, c'est de rendre la première cellule de ma ligne R4:GG4 vide, cellule active. suis en train de m'eméler les crayons avec For et Next depuis un bout de temps, je n'y arrive plus du tout. Il doit y avoir un blème pour sortir de la boucle quand la cellule vide est trouvée, mais lequel...??? Help me Please...
Sub celvide() Dim c As Range Range("R4:GG4").Select For Each c In Selection If c = "" Then c.Select End If c.Offset(0, 1).Select Next c 'suite macro.......
Bonsoir à toutes et à tous
Encore et toujours besoin de votre aide
J'essaye de faire fonctionner ce bout de macro,
et pour tourner, ça tourne, mais impossible de
trouver
comment l'arrêter.
Le but à obtenir, c'est de rendre la première
cellule de ma ligne R4:GG4 vide, cellule active.
suis en train de m'eméler les crayons avec For et
Next depuis un bout de temps, je n'y arrive plus
du tout. Il doit y avoir un blème pour sortir de
la boucle quand la cellule vide est trouvée, mais
lequel...???
Help me Please...
Sub celvide()
Dim c As Range
Range("R4:GG4").Select
For Each c In Selection
If c = "" Then
c.Select
End If
c.Offset(0, 1).Select
Next c
'suite macro.......
Bonsoir à toutes et à tous Encore et toujours besoin de votre aide J'essaye de faire fonctionner ce bout de macro, et pour tourner, ça tourne, mais impossible de trouver comment l'arrêter. Le but à obtenir, c'est de rendre la première cellule de ma ligne R4:GG4 vide, cellule active. suis en train de m'eméler les crayons avec For et Next depuis un bout de temps, je n'y arrive plus du tout. Il doit y avoir un blème pour sortir de la boucle quand la cellule vide est trouvée, mais lequel...??? Help me Please...
Sub celvide() Dim c As Range Range("R4:GG4").Select For Each c In Selection If c = "" Then c.Select End If c.Offset(0, 1).Select Next c 'suite macro.......
Eric
.../... Ooops trop vite écrit
ou un Exit For plutot
Eric
Michel.P écrivait news::
Bonsoir à toutes et à tous Encore et toujours besoin de votre aide J'essaye de faire fonctionner ce bout de macro, et pour tourner, ça tourne, mais impossible de trouver comment l'arrêter. Le but à obtenir, c'est de rendre la première cellule de ma ligne R4:GG4 vide, cellule active. suis en train de m'eméler les crayons avec For et Next depuis un bout de temps, je n'y arrive plus du tout. Il doit y avoir un blème pour sortir de la boucle quand la cellule vide est trouvée, mais lequel...??? Help me Please...
Sub celvide() Dim c As Range Range("R4:GG4").Select For Each c In Selection If c = "" Then c.Select End If c.Offset(0, 1).Select Next c 'suite macro.......
Bonsoir à toutes et à tous
Encore et toujours besoin de votre aide
J'essaye de faire fonctionner ce bout de macro,
et pour tourner, ça tourne, mais impossible de
trouver
comment l'arrêter.
Le but à obtenir, c'est de rendre la première
cellule de ma ligne R4:GG4 vide, cellule active.
suis en train de m'eméler les crayons avec For et
Next depuis un bout de temps, je n'y arrive plus
du tout. Il doit y avoir un blème pour sortir de
la boucle quand la cellule vide est trouvée, mais
lequel...???
Help me Please...
Sub celvide()
Dim c As Range
Range("R4:GG4").Select
For Each c In Selection
If c = "" Then
c.Select
End If
c.Offset(0, 1).Select
Next c
'suite macro.......
Bonsoir à toutes et à tous Encore et toujours besoin de votre aide J'essaye de faire fonctionner ce bout de macro, et pour tourner, ça tourne, mais impossible de trouver comment l'arrêter. Le but à obtenir, c'est de rendre la première cellule de ma ligne R4:GG4 vide, cellule active. suis en train de m'eméler les crayons avec For et Next depuis un bout de temps, je n'y arrive plus du tout. Il doit y avoir un blème pour sortir de la boucle quand la cellule vide est trouvée, mais lequel...??? Help me Please...
Sub celvide() Dim c As Range Range("R4:GG4").Select For Each c In Selection If c = "" Then c.Select End If c.Offset(0, 1).Select Next c 'suite macro.......
Michel.P
merci eric, mais le exit sub..stop the macro et le but est qu'elle continue son petit bonhomme de chemin aprés avoir rendu la cellule vide active..
Eric a pensé très fort :
Bonjour Michel
en mettant Exit Sub, non ?
If c = "" Then c.Select Exit Sub End If
A+ Eric
Michel.P écrivait news::
Bonsoir à toutes et à tous Encore et toujours besoin de votre aide J'essaye de faire fonctionner ce bout de macro, et pour tourner, ça tourne, mais impossible de trouver comment l'arrêter. Le but à obtenir, c'est de rendre la première cellule de ma ligne R4:GG4 vide, cellule active. suis en train de m'eméler les crayons avec For et Next depuis un bout de temps, je n'y arrive plus du tout. Il doit y avoir un blème pour sortir de la boucle quand la cellule vide est trouvée, mais lequel...??? Help me Please...
Sub celvide() Dim c As Range Range("R4:GG4").Select For Each c In Selection If c = "" Then c.Select End If c.Offset(0, 1).Select Next c 'suite macro.......
-- Amicalement Michel . P (un jour, serai Calife à la place du Calife...)
merci eric, mais le exit sub..stop the macro et
le but est qu'elle continue son petit bonhomme de
chemin aprés avoir rendu la cellule vide active..
Bonsoir à toutes et à tous
Encore et toujours besoin de votre aide
J'essaye de faire fonctionner ce bout de macro,
et pour tourner, ça tourne, mais impossible de
trouver
comment l'arrêter.
Le but à obtenir, c'est de rendre la première
cellule de ma ligne R4:GG4 vide, cellule active.
suis en train de m'eméler les crayons avec For et
Next depuis un bout de temps, je n'y arrive plus
du tout. Il doit y avoir un blème pour sortir de
la boucle quand la cellule vide est trouvée, mais
lequel...???
Help me Please...
Sub celvide()
Dim c As Range
Range("R4:GG4").Select
For Each c In Selection
If c = "" Then
c.Select
End If
c.Offset(0, 1).Select
Next c
'suite macro.......
--
Amicalement
Michel . P
(un jour, serai Calife à la place du Calife...)
merci eric, mais le exit sub..stop the macro et le but est qu'elle continue son petit bonhomme de chemin aprés avoir rendu la cellule vide active..
Eric a pensé très fort :
Bonjour Michel
en mettant Exit Sub, non ?
If c = "" Then c.Select Exit Sub End If
A+ Eric
Michel.P écrivait news::
Bonsoir à toutes et à tous Encore et toujours besoin de votre aide J'essaye de faire fonctionner ce bout de macro, et pour tourner, ça tourne, mais impossible de trouver comment l'arrêter. Le but à obtenir, c'est de rendre la première cellule de ma ligne R4:GG4 vide, cellule active. suis en train de m'eméler les crayons avec For et Next depuis un bout de temps, je n'y arrive plus du tout. Il doit y avoir un blème pour sortir de la boucle quand la cellule vide est trouvée, mais lequel...??? Help me Please...
Sub celvide() Dim c As Range Range("R4:GG4").Select For Each c In Selection If c = "" Then c.Select End If c.Offset(0, 1).Select Next c 'suite macro.......
-- Amicalement Michel . P (un jour, serai Calife à la place du Calife...)
YYYYYeeeeeeessss exit for est idéal, mon sauveur, une couronne pour mon sauveur 2h que je planche ..tu te rends compte ???? merci mille fois et bonne soirée
Eric a formulé la demande :
.../... Ooops trop vite écrit
ou un Exit For plutot
Eric
Michel.P écrivait news::
Bonsoir à toutes et à tous Encore et toujours besoin de votre aide J'essaye de faire fonctionner ce bout de macro, et pour tourner, ça tourne, mais impossible de trouver comment l'arrêter. Le but à obtenir, c'est de rendre la première cellule de ma ligne R4:GG4 vide, cellule active. suis en train de m'eméler les crayons avec For et Next depuis un bout de temps, je n'y arrive plus du tout. Il doit y avoir un blème pour sortir de la boucle quand la cellule vide est trouvée, mais lequel...??? Help me Please...
Sub celvide() Dim c As Range Range("R4:GG4").Select For Each c In Selection If c = "" Then c.Select End If c.Offset(0, 1).Select Next c 'suite macro.......
-- Amicalement Michel . P (un jour, serai Calife à la place du Calife...)
YYYYYeeeeeeessss exit for est idéal, mon sauveur,
une couronne pour mon sauveur
2h que je planche ..tu te rends compte ????
merci mille fois et bonne soirée
Bonsoir à toutes et à tous
Encore et toujours besoin de votre aide
J'essaye de faire fonctionner ce bout de macro,
et pour tourner, ça tourne, mais impossible de
trouver
comment l'arrêter.
Le but à obtenir, c'est de rendre la première
cellule de ma ligne R4:GG4 vide, cellule active.
suis en train de m'eméler les crayons avec For et
Next depuis un bout de temps, je n'y arrive plus
du tout. Il doit y avoir un blème pour sortir de
la boucle quand la cellule vide est trouvée, mais
lequel...???
Help me Please...
Sub celvide()
Dim c As Range
Range("R4:GG4").Select
For Each c In Selection
If c = "" Then
c.Select
End If
c.Offset(0, 1).Select
Next c
'suite macro.......
--
Amicalement
Michel . P
(un jour, serai Calife à la place du Calife...)
YYYYYeeeeeeessss exit for est idéal, mon sauveur, une couronne pour mon sauveur 2h que je planche ..tu te rends compte ???? merci mille fois et bonne soirée
Eric a formulé la demande :
.../... Ooops trop vite écrit
ou un Exit For plutot
Eric
Michel.P écrivait news::
Bonsoir à toutes et à tous Encore et toujours besoin de votre aide J'essaye de faire fonctionner ce bout de macro, et pour tourner, ça tourne, mais impossible de trouver comment l'arrêter. Le but à obtenir, c'est de rendre la première cellule de ma ligne R4:GG4 vide, cellule active. suis en train de m'eméler les crayons avec For et Next depuis un bout de temps, je n'y arrive plus du tout. Il doit y avoir un blème pour sortir de la boucle quand la cellule vide est trouvée, mais lequel...??? Help me Please...
Sub celvide() Dim c As Range Range("R4:GG4").Select For Each c In Selection If c = "" Then c.Select End If c.Offset(0, 1).Select Next c 'suite macro.......
-- Amicalement Michel . P (un jour, serai Calife à la place du Calife...)
JpPradier
Attention, ça génère une erreur s'il n'y a pas de cellule vide dans R4:GG4.
bonsoir JpPradier alors là...suis 'sur le cul" comme on dit dans mes Vosges natales, en UNE ligne tu resumes 2h00 de boulot acharné... (c'est la différence entre le pro et le novice...) bonsoir, Monsieur
-- Amicalement Michel . P (un jour, serai Calife à la place du Calife...)
bonsoir JpPradier
alors là...suis 'sur le cul" comme on dit dans
mes Vosges natales, en UNE ligne tu resumes 2h00
de boulot
acharné... (c'est la différence entre le pro et
le novice...)
bonsoir, Monsieur
bonsoir JpPradier alors là...suis 'sur le cul" comme on dit dans mes Vosges natales, en UNE ligne tu resumes 2h00 de boulot acharné... (c'est la différence entre le pro et le novice...) bonsoir, Monsieur
