Bonjour à tous
J’ai une requète ADO dans un Userform qui fonctionne :
Me.ComboBox1.Clear
Établir_Connexion (File)
Requete = "SELECT Pièce From [" & NomFeuille & "$] Group By Pièce"
Controle = "Combobox1"
MaRequêteAvecADO Controle, Requete
Elle me donne dans le combobox la liste :
Airs d'opéra
Concerto N°1
Concerto N°2
Requiem
Sonate N°2
Variation
Or je souhaite obtenir :
Airs d'opéra
Concerto
Requiem
Sonate
Variation
Je voudrais éliminer dans mon Combobox N°.. ect J’ai donc imaginé la
nouvelle macro :
Me.ComboBox1.Clear
T = Me.ComboBox1.List(Me.ComboBox1.ListIndex)
T = Replace(T, "'", "''")
T = Replace(T, T, = " = LEFT(T,LEN(T)-SEARCH("" N°"",T))")
Controle = "ComboBox1"
Requete = "SELECT Pièce From [" & NomFeuille & "$] like " & _
"'" & T & "' Group By Pièce"
MaRequêteAvecADO Controle, Requete
J’obtiens erreur de syntaxe sur T = Replace(T, T, = " =
LEFT(T,LEN(T)-SEARCH("" N°"",T))")
J’ai fait plusieurs autres essais en vain …solution ?
http://cjoint.com/?hdqgslQekw
A + j’espère
Bonjour à tous
J’ai une requète ADO dans un Userform qui fonctionne :
Me.ComboBox1.Clear
Établir_Connexion (File)
Requete = "SELECT Pièce From [" & NomFeuille & "$] Group By Pièce"
Controle = "Combobox1"
MaRequêteAvecADO Controle, Requete
Elle me donne dans le combobox la liste :
Airs d'opéra
Concerto N°1
Concerto N°2
Requiem
Sonate N°2
Variation
Or je souhaite obtenir :
Airs d'opéra
Concerto
Requiem
Sonate
Variation
Je voudrais éliminer dans mon Combobox N°.. ect J’ai donc imaginé la
nouvelle macro :
Me.ComboBox1.Clear
T = Me.ComboBox1.List(Me.ComboBox1.ListIndex)
T = Replace(T, "'", "''")
T = Replace(T, T, = " = LEFT(T,LEN(T)-SEARCH("" N°"",T))")
Controle = "ComboBox1"
Requete = "SELECT Pièce From [" & NomFeuille & "$] like " & _
"'" & T & "' Group By Pièce"
MaRequêteAvecADO Controle, Requete
J’obtiens erreur de syntaxe sur T = Replace(T, T, = " =
LEFT(T,LEN(T)-SEARCH("" N°"",T))")
J’ai fait plusieurs autres essais en vain …solution ?
http://cjoint.com/?hdqgslQekw
A + j’espère
Bonjour à tous
J’ai une requète ADO dans un Userform qui fonctionne :
Me.ComboBox1.Clear
Établir_Connexion (File)
Requete = "SELECT Pièce From [" & NomFeuille & "$] Group By Pièce"
Controle = "Combobox1"
MaRequêteAvecADO Controle, Requete
Elle me donne dans le combobox la liste :
Airs d'opéra
Concerto N°1
Concerto N°2
Requiem
Sonate N°2
Variation
Or je souhaite obtenir :
Airs d'opéra
Concerto
Requiem
Sonate
Variation
Je voudrais éliminer dans mon Combobox N°.. ect J’ai donc imaginé la
nouvelle macro :
Me.ComboBox1.Clear
T = Me.ComboBox1.List(Me.ComboBox1.ListIndex)
T = Replace(T, "'", "''")
T = Replace(T, T, = " = LEFT(T,LEN(T)-SEARCH("" N°"",T))")
Controle = "ComboBox1"
Requete = "SELECT Pièce From [" & NomFeuille & "$] like " & _
"'" & T & "' Group By Pièce"
MaRequêteAvecADO Controle, Requete
J’obtiens erreur de syntaxe sur T = Replace(T, T, = " =
LEFT(T,LEN(T)-SEARCH("" N°"",T))")
J’ai fait plusieurs autres essais en vain …solution ?
http://cjoint.com/?hdqgslQekw
A + j’espère
Salut à toi
Essaies comme ceci :
T = Replace(T, T, "" = " = LEFT(T,LEN(T)-SEARCH("" N°"",T))")
Celà devrait mieux fonctionner
Dis moi !!!!
Salut à toi
Essaies comme ceci :
T = Replace(T, T, "" = " = LEFT(T,LEN(T)-SEARCH("" N°"",T))")
Celà devrait mieux fonctionner
Dis moi !!!!
Salut à toi
Essaies comme ceci :
T = Replace(T, T, "" = " = LEFT(T,LEN(T)-SEARCH("" N°"",T))")
Celà devrait mieux fonctionner
Dis moi !!!!
Bonjour.
Non testé :
Sub MaRequêteAvecADO(Controle As String, Requete As String)
Set dico = CreateObject("scripting.dictionary")
Rst.Open Requete, Conn, adOpenStatic, adLockOptimistic
Do While Rst.EOF = False
If Rst(0) <> "" Then
dico.Add Split(Rst(0), " ")(0)
End If
Rst.MoveNext
Loop
Rst.Close
For Each i In dico.items
UserForm1.Controls(Controle).AddItem i
End Sub
Cordialement.
Daniel
> Bonjour à tous
>
> J’ai une requète ADO dans un Userform qui fonctionne :
>
> Me.ComboBox1.Clear
> Établir_Connexion (File)
> Requete = "SELECT Pièce From [" & NomFeuille & "$] Group By Pièce"
> Controle = "Combobox1"
> MaRequêteAvecADO Controle, Requete
>
> Elle me donne dans le combobox la liste :
> Airs d'opéra
> Concerto N°1
> Concerto N°2
> Requiem
> Sonate N°2
> Variation
>
> Or je souhaite obtenir :
> Airs d'opéra
> Concerto
> Requiem
> Sonate
> Variation
>
> Je voudrais éliminer dans mon Combobox N°.. ect J’ai donc imaginé la
> nouvelle macro :
> Me.ComboBox1.Clear
> T = Me.ComboBox1.List(Me.ComboBox1.ListIndex)
> T = Replace(T, "'", "''")
> T = Replace(T, T, = " = LEFT(T,LEN(T)-SEARCH("" N°"",T))")
> Controle = "ComboBox1"
> Requete = "SELECT Pièce From [" & NomFeuille & "$] like " & _
> "'" & T & "' Group By Pièce"
> MaRequêteAvecADO Controle, Requete
>
> J’obtiens erreur de syntaxe sur T = Replace(T, T, = " =
> LEFT(T,LEN(T)-SEARCH("" N°"",T))")
> J’ai fait plusieurs autres essais en vain …solution ?
> http://cjoint.com/?hdqgslQekw
>
> A + j’espère
Bonjour.
Non testé :
Sub MaRequêteAvecADO(Controle As String, Requete As String)
Set dico = CreateObject("scripting.dictionary")
Rst.Open Requete, Conn, adOpenStatic, adLockOptimistic
Do While Rst.EOF = False
If Rst(0) <> "" Then
dico.Add Split(Rst(0), " ")(0)
End If
Rst.MoveNext
Loop
Rst.Close
For Each i In dico.items
UserForm1.Controls(Controle).AddItem i
End Sub
Cordialement.
Daniel
> Bonjour à tous
>
> J’ai une requète ADO dans un Userform qui fonctionne :
>
> Me.ComboBox1.Clear
> Établir_Connexion (File)
> Requete = "SELECT Pièce From [" & NomFeuille & "$] Group By Pièce"
> Controle = "Combobox1"
> MaRequêteAvecADO Controle, Requete
>
> Elle me donne dans le combobox la liste :
> Airs d'opéra
> Concerto N°1
> Concerto N°2
> Requiem
> Sonate N°2
> Variation
>
> Or je souhaite obtenir :
> Airs d'opéra
> Concerto
> Requiem
> Sonate
> Variation
>
> Je voudrais éliminer dans mon Combobox N°.. ect J’ai donc imaginé la
> nouvelle macro :
> Me.ComboBox1.Clear
> T = Me.ComboBox1.List(Me.ComboBox1.ListIndex)
> T = Replace(T, "'", "''")
> T = Replace(T, T, = " = LEFT(T,LEN(T)-SEARCH("" N°"",T))")
> Controle = "ComboBox1"
> Requete = "SELECT Pièce From [" & NomFeuille & "$] like " & _
> "'" & T & "' Group By Pièce"
> MaRequêteAvecADO Controle, Requete
>
> J’obtiens erreur de syntaxe sur T = Replace(T, T, = " =
> LEFT(T,LEN(T)-SEARCH("" N°"",T))")
> J’ai fait plusieurs autres essais en vain …solution ?
> http://cjoint.com/?hdqgslQekw
>
> A + j’espère
Bonjour.
Non testé :
Sub MaRequêteAvecADO(Controle As String, Requete As String)
Set dico = CreateObject("scripting.dictionary")
Rst.Open Requete, Conn, adOpenStatic, adLockOptimistic
Do While Rst.EOF = False
If Rst(0) <> "" Then
dico.Add Split(Rst(0), " ")(0)
End If
Rst.MoveNext
Loop
Rst.Close
For Each i In dico.items
UserForm1.Controls(Controle).AddItem i
End Sub
Cordialement.
Daniel
> Bonjour à tous
>
> J’ai une requète ADO dans un Userform qui fonctionne :
>
> Me.ComboBox1.Clear
> Établir_Connexion (File)
> Requete = "SELECT Pièce From [" & NomFeuille & "$] Group By Pièce"
> Controle = "Combobox1"
> MaRequêteAvecADO Controle, Requete
>
> Elle me donne dans le combobox la liste :
> Airs d'opéra
> Concerto N°1
> Concerto N°2
> Requiem
> Sonate N°2
> Variation
>
> Or je souhaite obtenir :
> Airs d'opéra
> Concerto
> Requiem
> Sonate
> Variation
>
> Je voudrais éliminer dans mon Combobox N°.. ect J’ai donc imaginé la
> nouvelle macro :
> Me.ComboBox1.Clear
> T = Me.ComboBox1.List(Me.ComboBox1.ListIndex)
> T = Replace(T, "'", "''")
> T = Replace(T, T, = " = LEFT(T,LEN(T)-SEARCH("" N°"",T))")
> Controle = "ComboBox1"
> Requete = "SELECT Pièce From [" & NomFeuille & "$] like " & _
> "'" & T & "' Group By Pièce"
> MaRequêteAvecADO Controle, Requete
>
> J’obtiens erreur de syntaxe sur T = Replace(T, T, = " =
> LEFT(T,LEN(T)-SEARCH("" N°"",T))")
> J’ai fait plusieurs autres essais en vain …solution ?
> http://cjoint.com/?hdqgslQekw
>
> A + j’espère
Bonjour Daniel
Dans votre macro je ne vois nullepart où on veut se débarrasser de N° et de
ce qui suit derrière.
Bonne soirée
--
Jean-Paul V
"Daniel.C" wrote:Bonjour.
Non testé :
Sub MaRequêteAvecADO(Controle As String, Requete As String)
Set dico = CreateObject("scripting.dictionary")
Rst.Open Requete, Conn, adOpenStatic, adLockOptimistic
Do While Rst.EOF = False
If Rst(0) <> "" Then
dico.Add Split(Rst(0), " ")(0)
End If
Rst.MoveNext
Loop
Rst.Close
For Each i In dico.items
UserForm1.Controls(Controle).AddItem i
End Sub
Cordialement.
DanielBonjour à tous
J’ai une requète ADO dans un Userform qui fonctionne :
Me.ComboBox1.Clear
Établir_Connexion (File)
Requete = "SELECT Pièce From [" & NomFeuille & "$] Group By Pièce"
Controle = "Combobox1"
MaRequêteAvecADO Controle, Requete
Elle me donne dans le combobox la liste :
Airs d'opéra
Concerto N°1
Concerto N°2
Requiem
Sonate N°2
Variation
Or je souhaite obtenir :
Airs d'opéra
Concerto
Requiem
Sonate
Variation
Je voudrais éliminer dans mon Combobox N°.. ect J’ai donc imaginé la
nouvelle macro :
Me.ComboBox1.Clear
T = Me.ComboBox1.List(Me.ComboBox1.ListIndex)
T = Replace(T, "'", "''")
T = Replace(T, T, = " = LEFT(T,LEN(T)-SEARCH("" N°"",T))")
Controle = "ComboBox1"
Requete = "SELECT Pièce From [" & NomFeuille & "$] like " & _
"'" & T & "' Group By Pièce"
MaRequêteAvecADO Controle, Requete
J’obtiens erreur de syntaxe sur T = Replace(T, T, = " =
LEFT(T,LEN(T)-SEARCH("" N°"",T))")
J’ai fait plusieurs autres essais en vain …solution ?
http://cjoint.com/?hdqgslQekw
A + j’espère
Bonjour Daniel
Dans votre macro je ne vois nullepart où on veut se débarrasser de N° et de
ce qui suit derrière.
Bonne soirée
--
Jean-Paul V
"Daniel.C" wrote:
Bonjour.
Non testé :
Sub MaRequêteAvecADO(Controle As String, Requete As String)
Set dico = CreateObject("scripting.dictionary")
Rst.Open Requete, Conn, adOpenStatic, adLockOptimistic
Do While Rst.EOF = False
If Rst(0) <> "" Then
dico.Add Split(Rst(0), " ")(0)
End If
Rst.MoveNext
Loop
Rst.Close
For Each i In dico.items
UserForm1.Controls(Controle).AddItem i
End Sub
Cordialement.
Daniel
Bonjour à tous
J’ai une requète ADO dans un Userform qui fonctionne :
Me.ComboBox1.Clear
Établir_Connexion (File)
Requete = "SELECT Pièce From [" & NomFeuille & "$] Group By Pièce"
Controle = "Combobox1"
MaRequêteAvecADO Controle, Requete
Elle me donne dans le combobox la liste :
Airs d'opéra
Concerto N°1
Concerto N°2
Requiem
Sonate N°2
Variation
Or je souhaite obtenir :
Airs d'opéra
Concerto
Requiem
Sonate
Variation
Je voudrais éliminer dans mon Combobox N°.. ect J’ai donc imaginé la
nouvelle macro :
Me.ComboBox1.Clear
T = Me.ComboBox1.List(Me.ComboBox1.ListIndex)
T = Replace(T, "'", "''")
T = Replace(T, T, = " = LEFT(T,LEN(T)-SEARCH("" N°"",T))")
Controle = "ComboBox1"
Requete = "SELECT Pièce From [" & NomFeuille & "$] like " & _
"'" & T & "' Group By Pièce"
MaRequêteAvecADO Controle, Requete
J’obtiens erreur de syntaxe sur T = Replace(T, T, = " =
LEFT(T,LEN(T)-SEARCH("" N°"",T))")
J’ai fait plusieurs autres essais en vain …solution ?
http://cjoint.com/?hdqgslQekw
A + j’espère
Bonjour Daniel
Dans votre macro je ne vois nullepart où on veut se débarrasser de N° et de
ce qui suit derrière.
Bonne soirée
--
Jean-Paul V
"Daniel.C" wrote:Bonjour.
Non testé :
Sub MaRequêteAvecADO(Controle As String, Requete As String)
Set dico = CreateObject("scripting.dictionary")
Rst.Open Requete, Conn, adOpenStatic, adLockOptimistic
Do While Rst.EOF = False
If Rst(0) <> "" Then
dico.Add Split(Rst(0), " ")(0)
End If
Rst.MoveNext
Loop
Rst.Close
For Each i In dico.items
UserForm1.Controls(Controle).AddItem i
End Sub
Cordialement.
DanielBonjour à tous
J’ai une requète ADO dans un Userform qui fonctionne :
Me.ComboBox1.Clear
Établir_Connexion (File)
Requete = "SELECT Pièce From [" & NomFeuille & "$] Group By Pièce"
Controle = "Combobox1"
MaRequêteAvecADO Controle, Requete
Elle me donne dans le combobox la liste :
Airs d'opéra
Concerto N°1
Concerto N°2
Requiem
Sonate N°2
Variation
Or je souhaite obtenir :
Airs d'opéra
Concerto
Requiem
Sonate
Variation
Je voudrais éliminer dans mon Combobox N°.. ect J’ai donc imaginé la
nouvelle macro :
Me.ComboBox1.Clear
T = Me.ComboBox1.List(Me.ComboBox1.ListIndex)
T = Replace(T, "'", "''")
T = Replace(T, T, = " = LEFT(T,LEN(T)-SEARCH("" N°"",T))")
Controle = "ComboBox1"
Requete = "SELECT Pièce From [" & NomFeuille & "$] like " & _
"'" & T & "' Group By Pièce"
MaRequêteAvecADO Controle, Requete
J’obtiens erreur de syntaxe sur T = Replace(T, T, = " =
LEFT(T,LEN(T)-SEARCH("" N°"",T))")
J’ai fait plusieurs autres essais en vain …solution ?
http://cjoint.com/?hdqgslQekw
A + j’espère
Ce que tu demandes est difficilement réalisable sans développer une usine à gaz !
A ) Une requête "Select" n'est pas faite pour modifier le contenu du champ
mais pour l'extraire selon des critères le cas échéant.
B ) Avoir un contrôle "Listbox" qui affiche autre chose que le contenu du champ
d'où il est extrait... Comment penses-tu pouvoir extraire la photo à l'aide d'une
requête si le choix de l'usager dans le contrôle "Listbox" (pièce) ne se retrouve
pas dans le champ "Pièce" de la table dans la feuille de calcul ? Pour exécuter
cette requête, tu vas vouloir ajouter le "N°" au champ de la requête ?????
C ) Si tu as plusieurs concerto avec un "N°" ayant des images différentes, comment
retrouver l'image avec la bonne "Pièce" ?
Je t'invite à cogiter la dessus !
"Jean-Paul V" a écrit dans le message de groupe de
discussion :
Bonjour à tous
J’ai une requète ADO dans un Userform qui fonctionne :
Me.ComboBox1.Clear
Établir_Connexion (File)
Requete = "SELECT Pièce From [" & NomFeuille & "$] Group By Pièce"
Controle = "Combobox1"
MaRequêteAvecADO Controle, Requete
Elle me donne dans le combobox la liste :
Airs d'opéra
Concerto N°1
Concerto N°2
Requiem
Sonate N°2
Variation
Or je souhaite obtenir :
Airs d'opéra
Concerto
Requiem
Sonate
Variation
Je voudrais éliminer dans mon Combobox N°.. ect J’ai donc imaginé la
nouvelle macro :
Me.ComboBox1.Clear
T = Me.ComboBox1.List(Me.ComboBox1.ListIndex)
T = Replace(T, "'", "''")
T = Replace(T, T, = " = LEFT(T,LEN(T)-SEARCH("" N°"",T))")
Controle = "ComboBox1"
Requete = "SELECT Pièce From [" & NomFeuille & "$] like " & _
"'" & T & "' Group By Pièce"
MaRequêteAvecADO Controle, Requete
J’obtiens erreur de syntaxe sur T = Replace(T, T, = " > LEFT(T,LEN(T)-SEARCH("" N°"",T))")
J’ai fait plusieurs autres essais en vain …solution ?
http://cjoint.com/?hdqgslQekw
A + j’espère
--
Jean-Paul V
Ce que tu demandes est difficilement réalisable sans développer une usine à gaz !
A ) Une requête "Select" n'est pas faite pour modifier le contenu du champ
mais pour l'extraire selon des critères le cas échéant.
B ) Avoir un contrôle "Listbox" qui affiche autre chose que le contenu du champ
d'où il est extrait... Comment penses-tu pouvoir extraire la photo à l'aide d'une
requête si le choix de l'usager dans le contrôle "Listbox" (pièce) ne se retrouve
pas dans le champ "Pièce" de la table dans la feuille de calcul ? Pour exécuter
cette requête, tu vas vouloir ajouter le "N°" au champ de la requête ?????
C ) Si tu as plusieurs concerto avec un "N°" ayant des images différentes, comment
retrouver l'image avec la bonne "Pièce" ?
Je t'invite à cogiter la dessus !
"Jean-Paul V" <JeanPaulV@discussions.microsoft.com> a écrit dans le message de groupe de
discussion : BE225D1D-7DB6-4A84-B980-B2CD127A9A5B@microsoft.com...
Bonjour à tous
J’ai une requète ADO dans un Userform qui fonctionne :
Me.ComboBox1.Clear
Établir_Connexion (File)
Requete = "SELECT Pièce From [" & NomFeuille & "$] Group By Pièce"
Controle = "Combobox1"
MaRequêteAvecADO Controle, Requete
Elle me donne dans le combobox la liste :
Airs d'opéra
Concerto N°1
Concerto N°2
Requiem
Sonate N°2
Variation
Or je souhaite obtenir :
Airs d'opéra
Concerto
Requiem
Sonate
Variation
Je voudrais éliminer dans mon Combobox N°.. ect J’ai donc imaginé la
nouvelle macro :
Me.ComboBox1.Clear
T = Me.ComboBox1.List(Me.ComboBox1.ListIndex)
T = Replace(T, "'", "''")
T = Replace(T, T, = " = LEFT(T,LEN(T)-SEARCH("" N°"",T))")
Controle = "ComboBox1"
Requete = "SELECT Pièce From [" & NomFeuille & "$] like " & _
"'" & T & "' Group By Pièce"
MaRequêteAvecADO Controle, Requete
J’obtiens erreur de syntaxe sur T = Replace(T, T, = " > LEFT(T,LEN(T)-SEARCH("" N°"",T))")
J’ai fait plusieurs autres essais en vain …solution ?
http://cjoint.com/?hdqgslQekw
A + j’espère
--
Jean-Paul V
Ce que tu demandes est difficilement réalisable sans développer une usine à gaz !
A ) Une requête "Select" n'est pas faite pour modifier le contenu du champ
mais pour l'extraire selon des critères le cas échéant.
B ) Avoir un contrôle "Listbox" qui affiche autre chose que le contenu du champ
d'où il est extrait... Comment penses-tu pouvoir extraire la photo à l'aide d'une
requête si le choix de l'usager dans le contrôle "Listbox" (pièce) ne se retrouve
pas dans le champ "Pièce" de la table dans la feuille de calcul ? Pour exécuter
cette requête, tu vas vouloir ajouter le "N°" au champ de la requête ?????
C ) Si tu as plusieurs concerto avec un "N°" ayant des images différentes, comment
retrouver l'image avec la bonne "Pièce" ?
Je t'invite à cogiter la dessus !
"Jean-Paul V" a écrit dans le message de groupe de
discussion :
Bonjour à tous
J’ai une requète ADO dans un Userform qui fonctionne :
Me.ComboBox1.Clear
Établir_Connexion (File)
Requete = "SELECT Pièce From [" & NomFeuille & "$] Group By Pièce"
Controle = "Combobox1"
MaRequêteAvecADO Controle, Requete
Elle me donne dans le combobox la liste :
Airs d'opéra
Concerto N°1
Concerto N°2
Requiem
Sonate N°2
Variation
Or je souhaite obtenir :
Airs d'opéra
Concerto
Requiem
Sonate
Variation
Je voudrais éliminer dans mon Combobox N°.. ect J’ai donc imaginé la
nouvelle macro :
Me.ComboBox1.Clear
T = Me.ComboBox1.List(Me.ComboBox1.ListIndex)
T = Replace(T, "'", "''")
T = Replace(T, T, = " = LEFT(T,LEN(T)-SEARCH("" N°"",T))")
Controle = "ComboBox1"
Requete = "SELECT Pièce From [" & NomFeuille & "$] like " & _
"'" & T & "' Group By Pièce"
MaRequêteAvecADO Controle, Requete
J’obtiens erreur de syntaxe sur T = Replace(T, T, = " > LEFT(T,LEN(T)-SEARCH("" N°"",T))")
J’ai fait plusieurs autres essais en vain …solution ?
http://cjoint.com/?hdqgslQekw
A + j’espère
--
Jean-Paul V
| A ) Avec votre modif concernant le PB du ‘ vous m’avez montré que le pouvait
| dans la requête travaillé sur des éléments modifiés sans changer le champ de
| la requête.
****Moi, j'arrive à une autre conclusion : Remarque qu'avec le dédoublement
des " ' " , le contenu demeure le même dans le contrôle "Listbox" et la cellule
de la plage de cellules. Cela ne modifie en rien le contenu. Cela n'a rien à voir
avec ce que toi tu veux faire !
****Je n'ai pas compris ce que tu veux faire...mais il faudra que tu ajoutes
une nouvelle macro ou un bout de code...dans ton formulaire, tu parles d'un
combobox et d'un textbox... cela n'a rien à voir avec les 2 ListBox et un
contrôle "Picture" que contenait le formulaire que tu as publié.
| A ) Avec votre modif concernant le PB du ‘ vous m’avez montré que le pouvait
| dans la requête travaillé sur des éléments modifiés sans changer le champ de
| la requête.
****Moi, j'arrive à une autre conclusion : Remarque qu'avec le dédoublement
des " ' " , le contenu demeure le même dans le contrôle "Listbox" et la cellule
de la plage de cellules. Cela ne modifie en rien le contenu. Cela n'a rien à voir
avec ce que toi tu veux faire !
****Je n'ai pas compris ce que tu veux faire...mais il faudra que tu ajoutes
une nouvelle macro ou un bout de code...dans ton formulaire, tu parles d'un
combobox et d'un textbox... cela n'a rien à voir avec les 2 ListBox et un
contrôle "Picture" que contenait le formulaire que tu as publié.
| A ) Avec votre modif concernant le PB du ‘ vous m’avez montré que le pouvait
| dans la requête travaillé sur des éléments modifiés sans changer le champ de
| la requête.
****Moi, j'arrive à une autre conclusion : Remarque qu'avec le dédoublement
des " ' " , le contenu demeure le même dans le contrôle "Listbox" et la cellule
de la plage de cellules. Cela ne modifie en rien le contenu. Cela n'a rien à voir
avec ce que toi tu veux faire !
****Je n'ai pas compris ce que tu veux faire...mais il faudra que tu ajoutes
une nouvelle macro ou un bout de code...dans ton formulaire, tu parles d'un
combobox et d'un textbox... cela n'a rien à voir avec les 2 ListBox et un
contrôle "Picture" que contenait le formulaire que tu as publié.
| A ) Avec votre modif concernant le PB du ‘ vous m’avez montré que le pouvait
| dans la requête travaillé sur des éléments modifiés sans changer le champ de
| la requête.
****Moi, j'arrive à une autre conclusion : Remarque qu'avec le dédoublement
des " ' " , le contenu demeure le même dans le contrôle "Listbox" et la cellule
de la plage de cellules. Cela ne modifie en rien le contenu. Cela n'a rien à voir
avec ce que toi tu veux faire !
****Je n'ai pas compris ce que tu veux faire...mais il faudra que tu ajoutes
une nouvelle macro ou un bout de code...dans ton formulaire, tu parles d'un
combobox et d'un textbox... cela n'a rien à voir avec les 2 ListBox et un
contrôle "Picture" que contenait le formulaire que tu as publié.
| A ) Avec votre modif concernant le PB du ‘ vous m’avez montré que le pouvait
| dans la requête travaillé sur des éléments modifiés sans changer le champ de
| la requête.
****Moi, j'arrive à une autre conclusion : Remarque qu'avec le dédoublement
des " ' " , le contenu demeure le même dans le contrôle "Listbox" et la cellule
de la plage de cellules. Cela ne modifie en rien le contenu. Cela n'a rien à voir
avec ce que toi tu veux faire !
****Je n'ai pas compris ce que tu veux faire...mais il faudra que tu ajoutes
une nouvelle macro ou un bout de code...dans ton formulaire, tu parles d'un
combobox et d'un textbox... cela n'a rien à voir avec les 2 ListBox et un
contrôle "Picture" que contenait le formulaire que tu as publié.
| A ) Avec votre modif concernant le PB du ‘ vous m’avez montré que le pouvait
| dans la requête travaillé sur des éléments modifiés sans changer le champ de
| la requête.
****Moi, j'arrive à une autre conclusion : Remarque qu'avec le dédoublement
des " ' " , le contenu demeure le même dans le contrôle "Listbox" et la cellule
de la plage de cellules. Cela ne modifie en rien le contenu. Cela n'a rien à voir
avec ce que toi tu veux faire !
****Je n'ai pas compris ce que tu veux faire...mais il faudra que tu ajoutes
une nouvelle macro ou un bout de code...dans ton formulaire, tu parles d'un
combobox et d'un textbox... cela n'a rien à voir avec les 2 ListBox et un
contrôle "Picture" que contenait le formulaire que tu as publié.