herve62
XLDnaute Barbatruc
Bonjour
J'air rencontré ce code dans une appli et je ne le comprends pas
Cela correspond à quoi ?
Merci à vous
J'air rencontré ce code dans une appli et je ne le comprends pas
Cela correspond à quoi ?
Code:
For i = 1 To ActiveSheet.QueryTables.Count
ActiveSheet.QueryTables(i).Connection = "ODBC;DSN=Excel Files;DBQ=" & ThisWorkbook.FullName & ";DefaultDir=" & ThisWorkbook.Path
ActiveSheet.QueryTables(i).Refresh
Next
Merci à vous