Bonjour à tous !
Désolée de vous soliciter pendant l'heure sacrée de la sieste zzzzzzzzzzzz
Mais dès que vous serez de nouveau opérationnel(le)s auriez-vous la bonté,
avant l'heure du pastis, de m'aider à résoudre, en VBA, l'incommensurable
énigme qui hante mes (mon ??) nuerones depuis ce matin :
j'ai besoin de supprimer toutes les colonnes qui contiennent "jps" (toute
ressemblance avec un personnage existant ou ayant existé ne serait que pure
conïncidence) dans les cellules de la 3ème ligne.
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
Jacky
Bonjour Flo, Ceci peut-être '-------- Sub jj() For i = 255 To 1 Step -1 If Cells(3, i) = "jps" Then Columns(i).Delete Next End Sub '-------- Salutations JJ
-- Salutations JJ
"Flo" a écrit dans le message de news:
Bonjour à tous ! Désolée de vous soliciter pendant l'heure sacrée de la sieste zzzzzzzzzzzz Mais dès que vous serez de nouveau opérationnel(le)s auriez-vous la bonté, avant l'heure du pastis, de m'aider à résoudre, en VBA, l'incommensurable énigme qui hante mes (mon ??) nuerones depuis ce matin :
j'ai besoin de supprimer toutes les colonnes qui contiennent "jps" (toute ressemblance avec un personnage existant ou ayant existé ne serait que pure conïncidence) dans les cellules de la 3ème ligne.
Merci de vos contributions avisées.
Bonjour Flo,
Ceci peut-être
'--------
Sub jj()
For i = 255 To 1 Step -1
If Cells(3, i) = "jps" Then Columns(i).Delete
Next
End Sub
'--------
Salutations
JJ
--
Salutations
JJ
"Flo" <Flo@discussions.microsoft.com> a écrit dans le message de news:
0D95ACD7-1A4A-41FC-9FC0-3D48BCF1A9EB@microsoft.com...
Bonjour à tous !
Désolée de vous soliciter pendant l'heure sacrée de la sieste zzzzzzzzzzzz
Mais dès que vous serez de nouveau opérationnel(le)s auriez-vous la bonté,
avant l'heure du pastis, de m'aider à résoudre, en VBA, l'incommensurable
énigme qui hante mes (mon ??) nuerones depuis ce matin :
j'ai besoin de supprimer toutes les colonnes qui contiennent "jps" (toute
ressemblance avec un personnage existant ou ayant existé ne serait que
pure
conïncidence) dans les cellules de la 3ème ligne.
Bonjour Flo, Ceci peut-être '-------- Sub jj() For i = 255 To 1 Step -1 If Cells(3, i) = "jps" Then Columns(i).Delete Next End Sub '-------- Salutations JJ
-- Salutations JJ
"Flo" a écrit dans le message de news:
Bonjour à tous ! Désolée de vous soliciter pendant l'heure sacrée de la sieste zzzzzzzzzzzz Mais dès que vous serez de nouveau opérationnel(le)s auriez-vous la bonté, avant l'heure du pastis, de m'aider à résoudre, en VBA, l'incommensurable énigme qui hante mes (mon ??) nuerones depuis ce matin :
j'ai besoin de supprimer toutes les colonnes qui contiennent "jps" (toute ressemblance avec un personnage existant ou ayant existé ne serait que pure conïncidence) dans les cellules de la 3ème ligne.
Merci de vos contributions avisées.
Jacky
Ouppps!!! For i = 256 To 1 Step -1 Bien sûr. Jps y est caché ;o)) JJ
-- Salutations JJ
"Jacky" a écrit dans le message de news:
Bonjour Flo, Ceci peut-être '-------- Sub jj() For i = 255 To 1 Step -1 If Cells(3, i) = "jps" Then Columns(i).Delete Next End Sub '-------- Salutations JJ
-- Salutations JJ
"Flo" a écrit dans le message de news:
Bonjour à tous ! Désolée de vous soliciter pendant l'heure sacrée de la sieste zzzzzzzzzzzz Mais dès que vous serez de nouveau opérationnel(le)s auriez-vous la bonté, avant l'heure du pastis, de m'aider à résoudre, en VBA, l'incommensurable énigme qui hante mes (mon ??) nuerones depuis ce matin :
j'ai besoin de supprimer toutes les colonnes qui contiennent "jps" (toute ressemblance avec un personnage existant ou ayant existé ne serait que pure conïncidence) dans les cellules de la 3ème ligne.
Merci de vos contributions avisées.
Ouppps!!!
For i = 256 To 1 Step -1
Bien sûr.
Jps y est caché ;o))
JJ
--
Salutations
JJ
"Jacky" <nospams@not> a écrit dans le message de news:
ufacFAa2GHA.4388@TK2MSFTNGP03.phx.gbl...
Bonjour Flo,
Ceci peut-être
'--------
Sub jj()
For i = 255 To 1 Step -1
If Cells(3, i) = "jps" Then Columns(i).Delete
Next
End Sub
'--------
Salutations
JJ
--
Salutations
JJ
"Flo" <Flo@discussions.microsoft.com> a écrit dans le message de news:
0D95ACD7-1A4A-41FC-9FC0-3D48BCF1A9EB@microsoft.com...
Bonjour à tous !
Désolée de vous soliciter pendant l'heure sacrée de la sieste
zzzzzzzzzzzz
Mais dès que vous serez de nouveau opérationnel(le)s auriez-vous la
bonté,
avant l'heure du pastis, de m'aider à résoudre, en VBA, l'incommensurable
énigme qui hante mes (mon ??) nuerones depuis ce matin :
j'ai besoin de supprimer toutes les colonnes qui contiennent "jps" (toute
ressemblance avec un personnage existant ou ayant existé ne serait que
pure
conïncidence) dans les cellules de la 3ème ligne.
Ouppps!!! For i = 256 To 1 Step -1 Bien sûr. Jps y est caché ;o)) JJ
-- Salutations JJ
"Jacky" a écrit dans le message de news:
Bonjour Flo, Ceci peut-être '-------- Sub jj() For i = 255 To 1 Step -1 If Cells(3, i) = "jps" Then Columns(i).Delete Next End Sub '-------- Salutations JJ
-- Salutations JJ
"Flo" a écrit dans le message de news:
Bonjour à tous ! Désolée de vous soliciter pendant l'heure sacrée de la sieste zzzzzzzzzzzz Mais dès que vous serez de nouveau opérationnel(le)s auriez-vous la bonté, avant l'heure du pastis, de m'aider à résoudre, en VBA, l'incommensurable énigme qui hante mes (mon ??) nuerones depuis ce matin :
j'ai besoin de supprimer toutes les colonnes qui contiennent "jps" (toute ressemblance avec un personnage existant ou ayant existé ne serait que pure conïncidence) dans les cellules de la 3ème ligne.
