Bonsoir
Je désire remplacer les items de la plage A3:A1000 de la combobox1 par la
valeur de la textbox1
Je n'arrive pas à écrire une syntaxe correcte
Merci
Flo riant
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
Hervé
Bonsoir Florian, Peut être ceci ?
Dim Plage As Range Set Plage = Range([A1], [A65536].End(3)) Plage.Replace ComboBox1.Value, _ TextBox1.Value, _ xlWhole, _ xlByRows, _ False Set Plage = Nothing
Hervé.
"Florian" a écrit dans le message news: ePo3Vu#
Bonsoir Je désire remplacer les items de la plage A3:A1000 de la combobox1 par la valeur de la textbox1 Je n'arrive pas à écrire une syntaxe correcte Merci Flo riant
Dim Plage As Range
Set Plage = Range([A1], [A65536].End(3))
Plage.Replace ComboBox1.Value, _
TextBox1.Value, _
xlWhole, _
xlByRows, _
False
Set Plage = Nothing
Hervé.
"Florian" <florian@toto.fr> a écrit dans le message news:
ePo3Vu#fFHA.1284@TK2MSFTNGP14.phx.gbl...
Bonsoir
Je désire remplacer les items de la plage A3:A1000 de la combobox1 par la
valeur de la textbox1
Je n'arrive pas à écrire une syntaxe correcte
Merci
Flo riant
Dim Plage As Range Set Plage = Range([A1], [A65536].End(3)) Plage.Replace ComboBox1.Value, _ TextBox1.Value, _ xlWhole, _ xlByRows, _ False Set Plage = Nothing
Hervé.
"Florian" a écrit dans le message news: ePo3Vu#
Bonsoir Je désire remplacer les items de la plage A3:A1000 de la combobox1 par la valeur de la textbox1 Je n'arrive pas à écrire une syntaxe correcte Merci Flo riant
Bonjour. Ton code fonctionne chez moi -prends garde à "Cells", tu ratisses large. Cordialement. Daniel "Hervé" a écrit dans le message de news: OHZoe%23%
Bonsoir Florian, Peut être ceci ?
Dim Plage As Range Set Plage = Range([A1], [A65536].End(3)) Plage.Replace ComboBox1.Value, _ TextBox1.Value, _ xlWhole, _ xlByRows, _ False Set Plage = Nothing
Hervé.
"Florian" a écrit dans le message news: ePo3Vu#
Bonsoir Je désire remplacer les items de la plage A3:A1000 de la combobox1 par la valeur de la textbox1 Je n'arrive pas à écrire une syntaxe correcte Merci Flo riant
Bonjour.
Ton code fonctionne chez moi -prends garde à "Cells", tu ratisses large.
Cordialement.
Daniel
"Hervé" <hmsilve@wanadoo.fr> a écrit dans le message de news:
OHZoe%23%23fFHA.1248@TK2MSFTNGP12.phx.gbl...
Bonsoir Florian,
Peut être ceci ?
Dim Plage As Range
Set Plage = Range([A1], [A65536].End(3))
Plage.Replace ComboBox1.Value, _
TextBox1.Value, _
xlWhole, _
xlByRows, _
False
Set Plage = Nothing
Hervé.
"Florian" <florian@toto.fr> a écrit dans le message news:
ePo3Vu#fFHA.1284@TK2MSFTNGP14.phx.gbl...
Bonsoir
Je désire remplacer les items de la plage A3:A1000 de la combobox1 par la
valeur de la textbox1
Je n'arrive pas à écrire une syntaxe correcte
Merci
Flo riant
Bonjour. Ton code fonctionne chez moi -prends garde à "Cells", tu ratisses large. Cordialement. Daniel "Hervé" a écrit dans le message de news: OHZoe%23%
Bonsoir Florian, Peut être ceci ?
Dim Plage As Range Set Plage = Range([A1], [A65536].End(3)) Plage.Replace ComboBox1.Value, _ TextBox1.Value, _ xlWhole, _ xlByRows, _ False Set Plage = Nothing
Hervé.
"Florian" a écrit dans le message news: ePo3Vu#
Bonsoir Je désire remplacer les items de la plage A3:A1000 de la combobox1 par la valeur de la textbox1 Je n'arrive pas à écrire une syntaxe correcte Merci Flo riant
"Hervé" a écrit dans le message de news: OHZoe%23%
Bonsoir Florian, Peut être ceci ?
Dim Plage As Range Set Plage = Range([A1], [A65536].End(3)) Plage.Replace ComboBox1.Value, _ TextBox1.Value, _ xlWhole, _ xlByRows, _ False Set Plage = Nothing
Hervé.
"Florian" a écrit dans le message news: ePo3Vu#
Bonsoir Je désire remplacer les items de la plage A3:A1000 de la combobox1 par la valeur de la textbox1 Je n'arrive pas à écrire une syntaxe correcte Merci Flo riant
"Hervé" <hmsilve@wanadoo.fr> a écrit dans le message de news:
OHZoe%23%23fFHA.1248@TK2MSFTNGP12.phx.gbl...
Bonsoir Florian,
Peut être ceci ?
Dim Plage As Range
Set Plage = Range([A1], [A65536].End(3))
Plage.Replace ComboBox1.Value, _
TextBox1.Value, _
xlWhole, _
xlByRows, _
False
Set Plage = Nothing
Hervé.
"Florian" <florian@toto.fr> a écrit dans le message news:
ePo3Vu#fFHA.1284@TK2MSFTNGP14.phx.gbl...
Bonsoir
Je désire remplacer les items de la plage A3:A1000 de la combobox1 par la
valeur de la textbox1
Je n'arrive pas à écrire une syntaxe correcte
Merci
Flo riant
"Hervé" a écrit dans le message de news: OHZoe%23%
Bonsoir Florian, Peut être ceci ?
Dim Plage As Range Set Plage = Range([A1], [A65536].End(3)) Plage.Replace ComboBox1.Value, _ TextBox1.Value, _ xlWhole, _ xlByRows, _ False Set Plage = Nothing
Hervé.
"Florian" a écrit dans le message news: ePo3Vu#
Bonsoir Je désire remplacer les items de la plage A3:A1000 de la combobox1 par la valeur de la textbox1 Je n'arrive pas à écrire une syntaxe correcte Merci Flo riant
Bonsoir et merci c'est pour cela que je souhaite remplacer, cells par une plage bien définie Flo riant
"Daniel" a écrit dans le message de news: %23J4hEB$
Bonjour. Ton code fonctionne chez moi -prends garde à "Cells", tu ratisses large. Cordialement. Daniel "Hervé" a écrit dans le message de news: OHZoe%23%
Bonsoir Florian, Peut être ceci ?
Dim Plage As Range Set Plage = Range([A1], [A65536].End(3)) Plage.Replace ComboBox1.Value, _ TextBox1.Value, _ xlWhole, _ xlByRows, _ False Set Plage = Nothing
Hervé.
"Florian" a écrit dans le message news: ePo3Vu#
Bonsoir Je désire remplacer les items de la plage A3:A1000 de la combobox1 par la valeur de la textbox1 Je n'arrive pas à écrire une syntaxe correcte Merci Flo riant
Bonsoir et merci
c'est pour cela que je souhaite remplacer, cells par une plage bien définie
Flo riant
"Daniel" <dZZZcolardelle@free.fr> a écrit dans le message de news:
%23J4hEB$fFHA.2484@TK2MSFTNGP15.phx.gbl...
Bonjour.
Ton code fonctionne chez moi -prends garde à "Cells", tu ratisses large.
Cordialement.
Daniel
"Hervé" <hmsilve@wanadoo.fr> a écrit dans le message de news:
OHZoe%23%23fFHA.1248@TK2MSFTNGP12.phx.gbl...
Bonsoir Florian,
Peut être ceci ?
Dim Plage As Range
Set Plage = Range([A1], [A65536].End(3))
Plage.Replace ComboBox1.Value, _
TextBox1.Value, _
xlWhole, _
xlByRows, _
False
Set Plage = Nothing
Hervé.
"Florian" <florian@toto.fr> a écrit dans le message news:
ePo3Vu#fFHA.1284@TK2MSFTNGP14.phx.gbl...
Bonsoir
Je désire remplacer les items de la plage A3:A1000 de la combobox1 par
la
valeur de la textbox1
Je n'arrive pas à écrire une syntaxe correcte
Merci
Flo riant
Bonsoir et merci c'est pour cela que je souhaite remplacer, cells par une plage bien définie Flo riant
"Daniel" a écrit dans le message de news: %23J4hEB$
Bonjour. Ton code fonctionne chez moi -prends garde à "Cells", tu ratisses large. Cordialement. Daniel "Hervé" a écrit dans le message de news: OHZoe%23%
Bonsoir Florian, Peut être ceci ?
Dim Plage As Range Set Plage = Range([A1], [A65536].End(3)) Plage.Replace ComboBox1.Value, _ TextBox1.Value, _ xlWhole, _ xlByRows, _ False Set Plage = Nothing
Hervé.
"Florian" a écrit dans le message news: ePo3Vu#
Bonsoir Je désire remplacer les items de la plage A3:A1000 de la combobox1 par la valeur de la textbox1 Je n'arrive pas à écrire une syntaxe correcte Merci Flo riant