J'aimerai savoir comment faire une macro qui me balaye
la 3eme colonne de ma feuille(il peut y avoir des cellules
vides) et me remplace par exemple chaque enregistrement=20
qui contient "toto" par un lien hypertexte, et "tutu" par=20
un autre lien hypertexte.
je compte sur votre gentillesse pour me mettre sur la voie
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
sabatier
bonjour Ralf un truc dans ce genre et surtout bien dans le style de qui tu sais :
Sub TuVasMeChangerToutCaOuiOuM...?() 'MPFE le 04 juillet à 09.24.39 par JPS MVP HS For Each C In ActiveSheet.Range("A:A") If C.Value = "tutu" Then C.Value = "ton lien hypertexte" Next C End Sub
HTH jps
Ralf a écrit:
Bonjour à tous,
J'aimerai savoir comment faire une macro qui me balaye la 3eme colonne de ma feuille(il peut y avoir des cellules vides) et me remplace par exemple chaque enregistrement qui contient "toto" par un lien hypertexte, et "tutu" par un autre lien hypertexte. je compte sur votre gentillesse pour me mettre sur la voie
Bonne journée
bonjour Ralf
un truc dans ce genre et surtout bien dans le style de qui tu sais :
Sub TuVasMeChangerToutCaOuiOuM...?()
'MPFE le 04 juillet à 09.24.39 par JPS MVP HS
For Each C In ActiveSheet.Range("A:A")
If C.Value = "tutu" Then C.Value = "ton lien hypertexte"
Next C
End Sub
HTH
jps
Ralf a écrit:
Bonjour à tous,
J'aimerai savoir comment faire une macro qui me balaye
la 3eme colonne de ma feuille(il peut y avoir des cellules
vides) et me remplace par exemple chaque enregistrement
qui contient "toto" par un lien hypertexte, et "tutu" par
un autre lien hypertexte.
je compte sur votre gentillesse pour me mettre sur la voie
bonjour Ralf un truc dans ce genre et surtout bien dans le style de qui tu sais :
Sub TuVasMeChangerToutCaOuiOuM...?() 'MPFE le 04 juillet à 09.24.39 par JPS MVP HS For Each C In ActiveSheet.Range("A:A") If C.Value = "tutu" Then C.Value = "ton lien hypertexte" Next C End Sub
HTH jps
Ralf a écrit:
Bonjour à tous,
J'aimerai savoir comment faire une macro qui me balaye la 3eme colonne de ma feuille(il peut y avoir des cellules vides) et me remplace par exemple chaque enregistrement qui contient "toto" par un lien hypertexte, et "tutu" par un autre lien hypertexte. je compte sur votre gentillesse pour me mettre sur la voie
Bonne journée
sabatier
oups pardon, tu as dit 3e colonne, ralf remplace alors ("A:A") par ("C:C") sachant qu'il y a mieux à faire pour éviter de balayer toute la colonne, du style :
derligne = ActiveSheet.Range("C65536").End(xlUp).Row For Each C In ActiveSheet.Range("C1:C" & derligne)
et tu embrayes sur la suite jps
Ralf a écrit:
Bonjour à tous,
J'aimerai savoir comment faire une macro qui me balaye la 3eme colonne de ma feuille(il peut y avoir des cellules vides) et me remplace par exemple chaque enregistrement qui contient "toto" par un lien hypertexte, et "tutu" par un autre lien hypertexte. je compte sur votre gentillesse pour me mettre sur la voie
Bonne journée
oups pardon, tu as dit 3e colonne, ralf
remplace alors ("A:A") par ("C:C")
sachant qu'il y a mieux à faire pour éviter de balayer toute la colonne,
du style :
derligne = ActiveSheet.Range("C65536").End(xlUp).Row
For Each C In ActiveSheet.Range("C1:C" & derligne)
et tu embrayes sur la suite
jps
Ralf a écrit:
Bonjour à tous,
J'aimerai savoir comment faire une macro qui me balaye
la 3eme colonne de ma feuille(il peut y avoir des cellules
vides) et me remplace par exemple chaque enregistrement
qui contient "toto" par un lien hypertexte, et "tutu" par
un autre lien hypertexte.
je compte sur votre gentillesse pour me mettre sur la voie
oups pardon, tu as dit 3e colonne, ralf remplace alors ("A:A") par ("C:C") sachant qu'il y a mieux à faire pour éviter de balayer toute la colonne, du style :
derligne = ActiveSheet.Range("C65536").End(xlUp).Row For Each C In ActiveSheet.Range("C1:C" & derligne)
et tu embrayes sur la suite jps
Ralf a écrit:
Bonjour à tous,
J'aimerai savoir comment faire une macro qui me balaye la 3eme colonne de ma feuille(il peut y avoir des cellules vides) et me remplace par exemple chaque enregistrement qui contient "toto" par un lien hypertexte, et "tutu" par un autre lien hypertexte. je compte sur votre gentillesse pour me mettre sur la voie
Bonne journée
Philippe.R
Et l'autre cas JP ? hein ?
If C.Value = "tutu" Then C.Value = "ton lien hypertexte" ElseIf C.Value = "toto" Then C.Value = "ton autre lien hypertexte" End If -- Amicales Salutations Retirer A_S_ pour répondre. XL 97 / 2000 / 2002
"sabatier" a écrit dans le message de news:
bonjour Ralf un truc dans ce genre et surtout bien dans le style de qui tu sais :
Sub TuVasMeChangerToutCaOuiOuM...?() 'MPFE le 04 juillet à 09.24.39 par JPS MVP HS For Each C In ActiveSheet.Range("A:A") If C.Value = "tutu" Then C.Value = "ton lien hypertexte" Next C End Sub
HTH jps
Ralf a écrit:
Bonjour à tous,
J'aimerai savoir comment faire une macro qui me balaye la 3eme colonne de ma feuille(il peut y avoir des cellules vides) et me remplace par exemple chaque enregistrement qui contient "toto" par un lien hypertexte, et "tutu" par un autre lien hypertexte. je compte sur votre gentillesse pour me mettre sur la voie
Bonne journée
Et l'autre cas JP ? hein ?
If C.Value = "tutu" Then
C.Value = "ton lien hypertexte"
ElseIf C.Value = "toto" Then
C.Value = "ton autre lien hypertexte"
End If
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
"sabatier" <biscotteUnScudJpsabatdelaile@wanadoo.fr> a écrit dans le message de
news:40E7B0D4.7020301@wanadoo.fr...
bonjour Ralf
un truc dans ce genre et surtout bien dans le style de qui tu sais :
Sub TuVasMeChangerToutCaOuiOuM...?()
'MPFE le 04 juillet à 09.24.39 par JPS MVP HS
For Each C In ActiveSheet.Range("A:A")
If C.Value = "tutu" Then C.Value = "ton lien hypertexte"
Next C
End Sub
HTH
jps
Ralf a écrit:
Bonjour à tous,
J'aimerai savoir comment faire une macro qui me balaye
la 3eme colonne de ma feuille(il peut y avoir des cellules
vides) et me remplace par exemple chaque enregistrement
qui contient "toto" par un lien hypertexte, et "tutu" par
un autre lien hypertexte.
je compte sur votre gentillesse pour me mettre sur la voie
If C.Value = "tutu" Then C.Value = "ton lien hypertexte" ElseIf C.Value = "toto" Then C.Value = "ton autre lien hypertexte" End If -- Amicales Salutations Retirer A_S_ pour répondre. XL 97 / 2000 / 2002
"sabatier" a écrit dans le message de news:
bonjour Ralf un truc dans ce genre et surtout bien dans le style de qui tu sais :
Sub TuVasMeChangerToutCaOuiOuM...?() 'MPFE le 04 juillet à 09.24.39 par JPS MVP HS For Each C In ActiveSheet.Range("A:A") If C.Value = "tutu" Then C.Value = "ton lien hypertexte" Next C End Sub
HTH jps
Ralf a écrit:
Bonjour à tous,
J'aimerai savoir comment faire une macro qui me balaye la 3eme colonne de ma feuille(il peut y avoir des cellules vides) et me remplace par exemple chaque enregistrement qui contient "toto" par un lien hypertexte, et "tutu" par un autre lien hypertexte. je compte sur votre gentillesse pour me mettre sur la voie
Bonne journée
sabatier
alors là, philippe, béton + durcisseur jps
Philippe.R a écrit:
Et l'autre cas JP ? hein ?
If C.Value = "tutu" Then C.Value = "ton lien hypertexte" ElseIf C.Value = "toto" Then C.Value = "ton autre lien hypertexte" End If
alors là, philippe, béton + durcisseur
jps
Philippe.R a écrit:
Et l'autre cas JP ? hein ?
If C.Value = "tutu" Then
C.Value = "ton lien hypertexte"
ElseIf C.Value = "toto" Then
C.Value = "ton autre lien hypertexte"
End If
bonjour Ralf un truc dans ce genre et surtout bien dans le style de qui tu sais :
Sub TuVasMeChangerToutCaOuiOuM...?() 'MPFE le 04 juillet à 09.24.39 par JPS MVP HS For Each C In ActiveSheet.Range("A:A") If C.Value = "tutu" Then C.Value = "ton lien hypertexte" Next C End Sub
HTH jps
Ralf a écrit:
Bonjour à tous,
J'aimerai savoir comment faire une macro qui me balaye la 3eme colonne de ma feuille(il peut y avoir des cellules vides) et me remplace par exemple chaque enregistrement qui contient "toto" par un lien hypertexte, et "tutu" par un autre lien hypertexte. je compte sur votre gentillesse pour me mettre sur la voie
Bonne journée
Salut Paulo
Et à quoi ça sert que le Cap'taine Crochet se décarcasse?
[c]= ....
HEIN ?
NoSpam_j.thiernesse@skynet.be
"sabatier" <biscotteUnScudJpsabatdelaile@wanadoo.fr> wrote in message
news:40E7B0D4.7020301@wanadoo.fr...
bonjour Ralf
un truc dans ce genre et surtout bien dans le style de qui tu sais :
Sub TuVasMeChangerToutCaOuiOuM...?()
'MPFE le 04 juillet à 09.24.39 par JPS MVP HS
For Each C In ActiveSheet.Range("A:A")
If C.Value = "tutu" Then C.Value = "ton lien hypertexte"
Next C
End Sub
HTH
jps
Ralf a écrit:
Bonjour à tous,
J'aimerai savoir comment faire une macro qui me balaye
la 3eme colonne de ma feuille(il peut y avoir des cellules
vides) et me remplace par exemple chaque enregistrement
qui contient "toto" par un lien hypertexte, et "tutu" par
un autre lien hypertexte.
je compte sur votre gentillesse pour me mettre sur la voie
bonjour Ralf un truc dans ce genre et surtout bien dans le style de qui tu sais :
Sub TuVasMeChangerToutCaOuiOuM...?() 'MPFE le 04 juillet à 09.24.39 par JPS MVP HS For Each C In ActiveSheet.Range("A:A") If C.Value = "tutu" Then C.Value = "ton lien hypertexte" Next C End Sub
HTH jps
Ralf a écrit:
Bonjour à tous,
J'aimerai savoir comment faire une macro qui me balaye la 3eme colonne de ma feuille(il peut y avoir des cellules vides) et me remplace par exemple chaque enregistrement qui contient "toto" par un lien hypertexte, et "tutu" par un autre lien hypertexte. je compte sur votre gentillesse pour me mettre sur la voie
Bonne journée
sabatier
moi, monsieur, je fais dans le compréhensible et non dans le contracté...il y a éperluette (comme dit AV) que j'ai laissé tomber le [C] suite à une triple entorse du metacarpe suivi d'une double du metatarse puisqu'en désespoir de cause, j'avais opté pour une frappe pédidigitale... jps
Jacquouille a écrit:
Salut Paulo Et à quoi ça sert que le Cap'taine Crochet se décarcasse? [c]= .... HEIN ?
moi, monsieur, je fais dans le compréhensible et non dans le
contracté...il y a éperluette (comme dit AV) que j'ai laissé tomber le
[C] suite à une triple entorse du metacarpe suivi d'une double du
metatarse puisqu'en désespoir de cause, j'avais opté pour une frappe
pédidigitale...
jps
Jacquouille a écrit:
Salut Paulo
Et à quoi ça sert que le Cap'taine Crochet se décarcasse?
[c]= ....
HEIN ?
moi, monsieur, je fais dans le compréhensible et non dans le contracté...il y a éperluette (comme dit AV) que j'ai laissé tomber le [C] suite à une triple entorse du metacarpe suivi d'une double du metatarse puisqu'en désespoir de cause, j'avais opté pour une frappe pédidigitale... jps
Jacquouille a écrit:
Salut Paulo Et à quoi ça sert que le Cap'taine Crochet se décarcasse? [c]= .... HEIN ?
