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
Pierre CFI [mvp]
bonjour supposons que tu ai nommé la cellule A2 de la feuil3: Param "update ...... set nom_fourn=" & Range("Param") & " where...." ou "update ...... set nom_fourn=" & Worksheets("feuil3").Range("A2") & " where...."
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer Access http://users.skynet.be/mpfa/ Excel http://www.excelabo.net Site perso http://access.cfi.free.fr "George5" a écrit dans le message de news:89f401c4d2f1$bbc8d930$
Comment fait-on pour utiliser sous ms sqlquery dans une requete de type 'update', un parametre se trouvant dans une feuille excel ?
ex:
update fournisseur set nom_fourn=[parametre_excel] where no_fourn=1
merci.
bonjour
supposons que tu ai nommé la cellule A2 de la feuil3: Param
"update ...... set nom_fourn=" & Range("Param") & " where...."
ou
"update ...... set nom_fourn=" & Worksheets("feuil3").Range("A2") & " where...."
--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"George5" <anonymous@discussions.microsoft.com> a écrit dans le message de news:89f401c4d2f1$bbc8d930$a401280a@phx.gbl...
Comment fait-on pour utiliser sous ms sqlquery dans une
requete de type 'update', un parametre se trouvant dans
une feuille excel ?
ex:
update fournisseur
set nom_fourn=[parametre_excel]
where no_fourn=1
bonjour supposons que tu ai nommé la cellule A2 de la feuil3: Param "update ...... set nom_fourn=" & Range("Param") & " where...." ou "update ...... set nom_fourn=" & Worksheets("feuil3").Range("A2") & " where...."
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer Access http://users.skynet.be/mpfa/ Excel http://www.excelabo.net Site perso http://access.cfi.free.fr "George5" a écrit dans le message de news:89f401c4d2f1$bbc8d930$
Comment fait-on pour utiliser sous ms sqlquery dans une requete de type 'update', un parametre se trouvant dans une feuille excel ?
ex:
update fournisseur set nom_fourn=[parametre_excel] where no_fourn=1
merci.
michdenis
Bonjour George5,
Voici une réponse sur le sujet que j'ai déjà publiée. Évidemment, tu devras l'adapter
============================== Je suppose que tu as défini une requête paramétrée dans query. Pour ce faire, directement dans la fenêtre "Query", tu utilises les crochets droits et tu insères un petit texte significatif pour l'usager pour définir les paramètres de ta requête. Les symboles ">" et "<" sert à déterminer l'intervalle entre les dates choisies.
Exemple :
Dans la fenêtre "Critères"
NomDuChamp : Date critère : >[Date de début] Et <[Date de fin]
Tu retournes le résultat de la requête dans une feuille de ton classeur.
Avec un clic droit sur la plage de résultat, dans le menu déroulant , choisi : "Paramètre"
Dans la fenêtre qui s'ouvre : Tu sélectionnes dans la partie gauche de la fenêtre : " Date de début" et tu sélectionne le bouton radio :"Obtenir la valeur de la cellule suivante" : Tu indiques la cellule devant servir pour ce critère. Et pour finir, Tu coches le bouton radio si tu veux qu'excel actualise les données dès que tu modifieras le contenu de cette cellule (date de début) . Maintenant il te reste à faire la même chose concernant "Date de fin" . Voilà.
Si tu voulais obtenir le même résultat à partir d'une macro qui servirait à actualiser ton "querytable", tu pourrais t'inspirer de ceci. À copier dans la feuille module où l'action se déroule :
'---------------------------------- Private Sub Worksheet_Change(ByVal Target As Range)
'il est pris pour acquis que G1, G2 contiennent des dates 'ET 'G1 est plus petit que G2 ... tu peux ajouter une gestion 'd'erreur le cas échéant....! ( pas défini ici ! )
If Target.Address = [G1].Address Or _ Target.Address = [G2].Address Then 'En supposant que ton QueryTable se situe 'sur la feuille "Feuil1" 'Plage de critère de tes dates : 'Date de début : "Feuil1!G1" 'Date de Fin : "Feuil1!G2"
Dim P1 As Parameter Dim P2 As Parameter
'utilise l'index ou le nom de la requête With Worksheets("Feuil1").QueryTables(1) Set P1 = .Parameters(1) Set P2 = .Parameters(2) P1.SetParam xlRange, Range("Feuil1!G1") P2.SetParam xlRange, Range("Feuil1!G2") .Refresh False End With End If
End Sub '----------------------------------
==============================
Salutations!
"George5" a écrit dans le message de news: 89f401c4d2f1$bbc8d930$ Comment fait-on pour utiliser sous ms sqlquery dans une requete de type 'update', un parametre se trouvant dans une feuille excel ?
ex:
update fournisseur set nom_fourn=[parametre_excel] where no_fourn=1
merci.
Bonjour George5,
Voici une réponse sur le sujet que j'ai déjà publiée. Évidemment, tu devras l'adapter
============================== Je suppose que tu as défini une requête paramétrée dans query. Pour ce faire, directement dans la fenêtre "Query", tu
utilises les crochets droits et tu insères un petit texte significatif pour l'usager pour définir les paramètres de ta
requête. Les symboles ">" et "<" sert à déterminer l'intervalle entre les dates choisies.
Exemple :
Dans la fenêtre "Critères"
NomDuChamp : Date
critère : >[Date de début] Et <[Date de fin]
Tu retournes le résultat de la requête dans une feuille de ton classeur.
Avec un clic droit sur la plage de résultat, dans le menu déroulant , choisi : "Paramètre"
Dans la fenêtre qui s'ouvre : Tu sélectionnes dans la partie gauche de la fenêtre : " Date de début" et tu sélectionne
le bouton radio :"Obtenir la valeur de la cellule suivante" : Tu indiques la cellule devant servir pour ce critère. Et
pour finir, Tu coches le bouton radio si tu veux qu'excel actualise les données dès que tu modifieras le contenu de
cette cellule
(date de début) . Maintenant il te reste à faire la même chose concernant "Date de fin" . Voilà.
Si tu voulais obtenir le même résultat à partir d'une macro qui servirait à actualiser ton "querytable", tu pourrais
t'inspirer de ceci. À copier dans la feuille module où l'action se déroule :
'----------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)
'il est pris pour acquis que G1, G2 contiennent des dates
'ET
'G1 est plus petit que G2 ... tu peux ajouter une gestion
'd'erreur le cas échéant....! ( pas défini ici ! )
If Target.Address = [G1].Address Or _
Target.Address = [G2].Address Then
'En supposant que ton QueryTable se situe
'sur la feuille "Feuil1"
'Plage de critère de tes dates :
'Date de début : "Feuil1!G1"
'Date de Fin : "Feuil1!G2"
Dim P1 As Parameter
Dim P2 As Parameter
'utilise l'index ou le nom de la requête
With Worksheets("Feuil1").QueryTables(1)
Set P1 = .Parameters(1)
Set P2 = .Parameters(2)
P1.SetParam xlRange, Range("Feuil1!G1")
P2.SetParam xlRange, Range("Feuil1!G2")
.Refresh False
End With
End If
End Sub
'----------------------------------
==============================
Salutations!
"George5" <anonymous@discussions.microsoft.com> a écrit dans le message de news:
89f401c4d2f1$bbc8d930$a401280a@phx.gbl...
Comment fait-on pour utiliser sous ms sqlquery dans une
requete de type 'update', un parametre se trouvant dans
une feuille excel ?
ex:
update fournisseur
set nom_fourn=[parametre_excel]
where no_fourn=1
Voici une réponse sur le sujet que j'ai déjà publiée. Évidemment, tu devras l'adapter
============================== Je suppose que tu as défini une requête paramétrée dans query. Pour ce faire, directement dans la fenêtre "Query", tu utilises les crochets droits et tu insères un petit texte significatif pour l'usager pour définir les paramètres de ta requête. Les symboles ">" et "<" sert à déterminer l'intervalle entre les dates choisies.
Exemple :
Dans la fenêtre "Critères"
NomDuChamp : Date critère : >[Date de début] Et <[Date de fin]
Tu retournes le résultat de la requête dans une feuille de ton classeur.
Avec un clic droit sur la plage de résultat, dans le menu déroulant , choisi : "Paramètre"
Dans la fenêtre qui s'ouvre : Tu sélectionnes dans la partie gauche de la fenêtre : " Date de début" et tu sélectionne le bouton radio :"Obtenir la valeur de la cellule suivante" : Tu indiques la cellule devant servir pour ce critère. Et pour finir, Tu coches le bouton radio si tu veux qu'excel actualise les données dès que tu modifieras le contenu de cette cellule (date de début) . Maintenant il te reste à faire la même chose concernant "Date de fin" . Voilà.
Si tu voulais obtenir le même résultat à partir d'une macro qui servirait à actualiser ton "querytable", tu pourrais t'inspirer de ceci. À copier dans la feuille module où l'action se déroule :
'---------------------------------- Private Sub Worksheet_Change(ByVal Target As Range)
'il est pris pour acquis que G1, G2 contiennent des dates 'ET 'G1 est plus petit que G2 ... tu peux ajouter une gestion 'd'erreur le cas échéant....! ( pas défini ici ! )
If Target.Address = [G1].Address Or _ Target.Address = [G2].Address Then 'En supposant que ton QueryTable se situe 'sur la feuille "Feuil1" 'Plage de critère de tes dates : 'Date de début : "Feuil1!G1" 'Date de Fin : "Feuil1!G2"
Dim P1 As Parameter Dim P2 As Parameter
'utilise l'index ou le nom de la requête With Worksheets("Feuil1").QueryTables(1) Set P1 = .Parameters(1) Set P2 = .Parameters(2) P1.SetParam xlRange, Range("Feuil1!G1") P2.SetParam xlRange, Range("Feuil1!G2") .Refresh False End With End If
End Sub '----------------------------------
==============================
Salutations!
"George5" a écrit dans le message de news: 89f401c4d2f1$bbc8d930$ Comment fait-on pour utiliser sous ms sqlquery dans une requete de type 'update', un parametre se trouvant dans une feuille excel ?
ex:
update fournisseur set nom_fourn=[parametre_excel] where no_fourn=1
