Bonjour à tous,
Comment peut on nettoyer une feuille des étiquettes créées par
.QueryTables.Add(Connection:=
afin qu'on ne puisse plus, accéder aux propriétés de
"DonnéesExternes_1" et suivantes, ni mettre à jour la requête.
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
Patrick Loury
Excusez du post en double emploi, qqc m'a glissé des mains. Pat "Patrick Loury" a écrit dans le message de news: 4248158d$0$11717$
Bonjour à tous, Comment peut on nettoyer une feuille des étiquettes créées par .QueryTables.Add(Connection: > afin qu'on ne puisse plus, accéder aux propriétés de "DonnéesExternes_1" et suivantes, ni mettre à jour la requête.
Excusez du post en double emploi,
qqc m'a glissé des mains.
Pat
"Patrick Loury" <NOSPAMpatrick.loury@wanadoo.fr> a écrit dans le
message de news: 4248158d$0$11717$8fcfb975@news.wanadoo.fr...
Bonjour à tous,
Comment peut on nettoyer une feuille des étiquettes créées par
.QueryTables.Add(Connection: > afin qu'on ne puisse plus, accéder aux propriétés de
"DonnéesExternes_1" et suivantes, ni mettre à jour la requête.
Excusez du post en double emploi, qqc m'a glissé des mains. Pat "Patrick Loury" a écrit dans le message de news: 4248158d$0$11717$
Bonjour à tous, Comment peut on nettoyer une feuille des étiquettes créées par .QueryTables.Add(Connection: > afin qu'on ne puisse plus, accéder aux propriétés de "DonnéesExternes_1" et suivantes, ni mettre à jour la requête.
'lSteph "Patrick Loury" a écrit dans le message de news: 4248158d$0$11717$
Bonjour à tous, Comment peut on nettoyer une feuille des étiquettes créées par .QueryTables.Add(Connection: > afin qu'on ne puisse plus, accéder aux propriétés de "DonnéesExternes_1" et suivantes, ni mettre à jour la requête.
'lSteph
"Patrick Loury" <NOSPAMpatrick.loury@wanadoo.fr> a écrit dans le message de
news: 4248158d$0$11717$8fcfb975@news.wanadoo.fr...
Bonjour à tous,
Comment peut on nettoyer une feuille des étiquettes créées par
.QueryTables.Add(Connection: > afin qu'on ne puisse plus, accéder aux propriétés de
"DonnéesExternes_1" et suivantes, ni mettre à jour la requête.
'lSteph "Patrick Loury" a écrit dans le message de news: 4248158d$0$11717$
Bonjour à tous, Comment peut on nettoyer une feuille des étiquettes créées par .QueryTables.Add(Connection: > afin qu'on ne puisse plus, accéder aux propriétés de "DonnéesExternes_1" et suivantes, ni mettre à jour la requête.
Patrick Loury
Merci LSteph, j'avais vu add, mais pas delete pour tout nettoyer : cptqt = ThisWorkbook.ActiveSheet.QueryTables.Count For Compteur = cptqt To 0 Step -1 On Error Resume Next ThisWorkbook.ActiveSheet.QueryTables(Compteur).Delete Next
'lSteph "Patrick Loury" a écrit dans le message de
news: 4248158d$0$11717$
Bonjour à tous, Comment peut on nettoyer une feuille des étiquettes créées par
.QueryTables.Add(Connection: > > afin qu'on ne puisse plus, accéder aux propriétés de "DonnéesExternes_1" et suivantes, ni mettre à jour la requête.
Merci LSteph, j'avais vu add, mais pas delete
pour tout nettoyer :
cptqt = ThisWorkbook.ActiveSheet.QueryTables.Count
For Compteur = cptqt To 0 Step -1
On Error Resume Next
ThisWorkbook.ActiveSheet.QueryTables(Compteur).Delete
Next
Pat
"LSteph" <lecocosteph@frite.fr> a écrit dans le message de news:
ufYPzZ6MFHA.2748@TK2MSFTNGP09.phx.gbl...
Merci LSteph, j'avais vu add, mais pas delete pour tout nettoyer : cptqt = ThisWorkbook.ActiveSheet.QueryTables.Count For Compteur = cptqt To 0 Step -1 On Error Resume Next ThisWorkbook.ActiveSheet.QueryTables(Compteur).Delete Next
'lSteph "Patrick Loury" a écrit dans le message de
news: 4248158d$0$11717$
Bonjour à tous, Comment peut on nettoyer une feuille des étiquettes créées par
.QueryTables.Add(Connection: > > afin qu'on ne puisse plus, accéder aux propriétés de "DonnéesExternes_1" et suivantes, ni mettre à jour la requête.
LSteph
Bonsoir Patrick, Oui c'est l'idée,bien sûr s'il y en plusieurs tu boucles ! :-) à bientôt.
lSteph
"Patrick Loury" a écrit dans le message de news: 42490af7$0$19340$
Merci LSteph, j'avais vu add, mais pas delete pour tout nettoyer : cptqt = ThisWorkbook.ActiveSheet.QueryTables.Count For Compteur = cptqt To 0 Step -1 On Error Resume Next ThisWorkbook.ActiveSheet.QueryTables(Compteur).Delete Next
'lSteph "Patrick Loury" a écrit dans le message de
news: 4248158d$0$11717$
Bonjour à tous, Comment peut on nettoyer une feuille des étiquettes créées par
.QueryTables.Add(Connection: >> > afin qu'on ne puisse plus, accéder aux propriétés de "DonnéesExternes_1" et suivantes, ni mettre à jour la requête.
Bonsoir Patrick,
Oui c'est l'idée,bien sûr s'il y en plusieurs tu boucles !
:-) à bientôt.
lSteph
"Patrick Loury" <NOSPAMpatrick.loury@wanadoo.fr> a écrit dans le message de
news: 42490af7$0$19340$8fcfb975@news.wanadoo.fr...
Merci LSteph, j'avais vu add, mais pas delete
pour tout nettoyer :
cptqt = ThisWorkbook.ActiveSheet.QueryTables.Count
For Compteur = cptqt To 0 Step -1
On Error Resume Next
ThisWorkbook.ActiveSheet.QueryTables(Compteur).Delete
Next
Pat
"LSteph" <lecocosteph@frite.fr> a écrit dans le message de news:
ufYPzZ6MFHA.2748@TK2MSFTNGP09.phx.gbl...
Bonsoir Patrick, Oui c'est l'idée,bien sûr s'il y en plusieurs tu boucles ! :-) à bientôt.
lSteph
"Patrick Loury" a écrit dans le message de news: 42490af7$0$19340$
Merci LSteph, j'avais vu add, mais pas delete pour tout nettoyer : cptqt = ThisWorkbook.ActiveSheet.QueryTables.Count For Compteur = cptqt To 0 Step -1 On Error Resume Next ThisWorkbook.ActiveSheet.QueryTables(Compteur).Delete Next
