Au lancement, modifier automatiquement des valeurs récupérées d'Access

**niano** · 04/10/2007, 15h17

Bonjour tout le monde,

Je ne connais pas bien Excel et je voudrais trouver un code tout bête.

Lorsque j'ouvre un fichier Excel, il récupère des données de tables Access et j'utilise

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.RefreshAll

pour qu'il mette les données à jour.

Cependant, je voudrais qu'au lancement, il modifie toute les cellules (d'une même colonne) où il y aurait la valeur: "1" par exemple, par un mot: "test" par exemple.

Quelqu'un aurait il une idée ?
Merci d'avance

J'aurais une deuxième question une fois la solution trouvée mais je la poserais après avoir cherché un peu...

**random** · 04/10/2007, 15h52

il faut intervenir aun niveau de ton sql sous msquery

supposons qu'il soit

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
select monchamp from matable;

il faut le remplacer par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

select iif(monchamp=[param1];[param2];monchamp)  from matable;

de retour sous excel tu lies [param1],[param2] à deux cellules et tu règles ta requête pour mise à jour auto

**niano** · 04/10/2007, 16h04

...

J'ai pas tout compris là.
Ma requête a été générée automatiquement par Excel:
Données - > Données externes -> Importer des données

Je n'ai pas utilisé MSQuery: je devrais ?

Lorsque j'ouvre l'utilitaire de modification des requêtes, la requête ne ressemble pas du tout à un:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SELECT * FROM ma_table

En fait, le type de commande est "Table" et le texte de la commande est juste le nom de ma table.

Y'aurait pas un autre moyen qui serait plus à mon niveau ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Change(cells="1";"test")

Ca n'existe pas mais ça serait bien un truc dans ce style

**random** · 04/10/2007, 17h21

passe par données
données externe
créer une requête

**niano** · 04/10/2007, 17h47

Je ne veux pas créer de requêtes, je ne veux pas modifier des valeurs dans la base de données mais dans ma feuille excel directement.

La feuille s'ouvre et elle récupère la colonne "Contact" d'une de mes tables. Les entrées de cette colonne "Contact" sont soit "1" soit "2".

Je voudrais qu'après avoir charger les données de la colonne, Excel change les "1" en "physique" et les "2" en "téléphonique".

Ces changements ne doivent pas se faire dans Access mais dans Excel. Je dois crée une requête pour ça ?

(je galère avec MSQuery...)

**da991319** · 04/10/2007, 19h08

Bonjour,

Si tes valeurs dans cette colonne ne sont que des 1 ou 2, tu peux toujours utiliser la fonction replace:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
Sub Change()
 
Range("A1:A50").Select ' Selection de ta colonne "Contact"
 
 
With Selection
    .Replace what:="1", replacement:="physique"
    .Replace what:="2", replacement:="telephonique"
End With
 
End Sub

**niano** · 08/10/2007, 16h27

Effectivement, cette solution me suffirait et je te remercie pour ton aide.

Cependant, je me demandait s'il était possible de sélectionner l'ensemble de la feuille pour faire la modification. En effet, la méthode

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range(***).select

me permet de sélectionner une seule colonne.

Est il possible d'indiquer de sélectionner toutes les colonnes de la feuille ?

De plus, dans le VB Editor, je voudrais appeler une méthode d'une feuille nommée "sheet1" depuis le "workbook" mais je ne sais pas comment faire.