Récupération de la valeur d'une cellule
Résolu/Fermé
A voir également:
- Récupération de la valeur d'une cellule
- Aller à la ligne dans une cellule excel - Guide
- Si cellule contient texte alors ✓ - Forum Excel
- Verrouiller cellule excel - Guide
- Excel colorer une cellule sous condition d'une autre cellule ✓ - Forum Excel
- Mail facebook code de recuperation ✓ - Forum Facebook
2 réponses
ThauTheme
Messages postés
1442
Date d'inscription
mardi 21 octobre 2014
Statut
Membre
Dernière intervention
29 juillet 2022
160
13 déc. 2016 à 16:03
13 déc. 2016 à 16:03
Bonjour DD, bonjour le forum,
Jamais utilisé ce genre de code mais peut-être que :
Jamais utilisé ce genre de code mais peut-être que :
With Sheets(output_sheet).QueryTables.Add(Connection:="TEXT;" & Sheets("Ton_Onglet").Range("A2").Value & file_name, Destination:=Sheets(output_sheet).Range("$A$" + row_number))
Salut Thautheme,
Merci de votre contribution ;
Votre idée m'a aidé à trouvé la solution :
Le Range(A2) contenait un chemin c:\chemin\repertoire\
VBA refuse le : donc j'ai modifie l'expression
With Sheets(output_sheet).QueryTables.Add(Connection:="TEXT;" & Sheets("Ton_Onglet").Range("A2").Value & file_name
par
With Sheets(output_sheet).QueryTables.Add(Connection:="TEXT;C:\" & Sheets("Ton_Onglet").Range("A2").Value & file_name
avec la cellule A2 contenant uniquement chemin\repertoire\
ca marche du tonnerre :)
Merci de votre contribution ;
Votre idée m'a aidé à trouvé la solution :
Le Range(A2) contenait un chemin c:\chemin\repertoire\
VBA refuse le : donc j'ai modifie l'expression
With Sheets(output_sheet).QueryTables.Add(Connection:="TEXT;" & Sheets("Ton_Onglet").Range("A2").Value & file_name
par
With Sheets(output_sheet).QueryTables.Add(Connection:="TEXT;C:\" & Sheets("Ton_Onglet").Range("A2").Value & file_name
avec la cellule A2 contenant uniquement chemin\repertoire\
ca marche du tonnerre :)