-----Message d'origine-----
Bonjour Ninette,
Ici nous sommes tous des mages... C'est bien connu.
D'ailleurs à cause de
cela je me demande encore comment d'autres forums peuvent
coexister avec le
notre ;-)
Si au lieu de nous balancer le code, tu nous disais à
quelle question il t'a
été proposé comme réponse ? Que veux tu faire, où est ce
que ça coince, quel
est le pb ? Ca marche pas c'est un peu court comme
explication !
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" a écrit dans le
message de news:
076901c35287$b673c990$
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:úlse
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
-----Message d'origine-----
Bonjour Ninette,
Ici nous sommes tous des mages... C'est bien connu.
D'ailleurs à cause de
cela je me demande encore comment d'autres forums peuvent
coexister avec le
notre ;-)
Si au lieu de nous balancer le code, tu nous disais à
quelle question il t'a
été proposé comme réponse ? Que veux tu faire, où est ce
que ça coince, quel
est le pb ? Ca marche pas c'est un peu court comme
explication !
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" <joe8279@caramail.com> a écrit dans le
message de news:
076901c35287$b673c990$a501280a@phx.gbl...
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:=False
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
-----Message d'origine-----
Bonjour Ninette,
Ici nous sommes tous des mages... C'est bien connu.
D'ailleurs à cause de
cela je me demande encore comment d'autres forums peuvent
coexister avec le
notre ;-)
Si au lieu de nous balancer le code, tu nous disais à
quelle question il t'a
été proposé comme réponse ? Que veux tu faire, où est ce
que ça coince, quel
est le pb ? Ca marche pas c'est un peu court comme
explication !
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" a écrit dans le
message de news:
076901c35287$b673c990$
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:úlse
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
-----Message d'origine-----
Bonjour Ninette,
Ici nous sommes tous des mages... C'est bien connu.
D'ailleurs à cause de
cela je me demande encore comment d'autres forums peuvent
coexister avec le
notre ;-)
Si au lieu de nous balancer le code, tu nous disais à
quelle question il t'a
été proposé comme réponse ? Que veux tu faire, où est ce
que ça coince, quel
est le pb ? Ca marche pas c'est un peu court comme
explication !
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
=========== >
"Ninette13" a écrit dans le
message de news:
076901c35287$b673c990$
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:úlse
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
-----Message d'origine-----
Bonjour Ninette,
Ici nous sommes tous des mages... C'est bien connu.
D'ailleurs à cause de
cela je me demande encore comment d'autres forums peuvent
coexister avec le
notre ;-)
Si au lieu de nous balancer le code, tu nous disais à
quelle question il t'a
été proposé comme réponse ? Que veux tu faire, où est ce
que ça coince, quel
est le pb ? Ca marche pas c'est un peu court comme
explication !
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
=========== >
"Ninette13" <joe8279@caramail.com> a écrit dans le
message de news:
076901c35287$b673c990$a501280a@phx.gbl...
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:úlse
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
-----Message d'origine-----
Bonjour Ninette,
Ici nous sommes tous des mages... C'est bien connu.
D'ailleurs à cause de
cela je me demande encore comment d'autres forums peuvent
coexister avec le
notre ;-)
Si au lieu de nous balancer le code, tu nous disais à
quelle question il t'a
été proposé comme réponse ? Que veux tu faire, où est ce
que ça coince, quel
est le pb ? Ca marche pas c'est un peu court comme
explication !
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
=========== >
"Ninette13" a écrit dans le
message de news:
076901c35287$b673c990$
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:úlse
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
Bonjour mage!
Je suis désolée, ma question était posée juste en
dessous!!!
Je te copie colle le message!
" Bonjour!!!!
Jusqu'ici, lorsque je voulais rapatrier des données d'une
page html sur un tableau excel, il fallait que j'aille sur
le web, que je fasse un copier coller vers ma feuille
excel... Lorsqu'il y a beaucoup de données, cela prend un
temps fou!
Je voulais donc créer si c'est possible, une macro qui
automatise l'ouverture de la page et le rapatriement. Je
ne sais pas comment faire et j'ai besoin de vos lumières!!!
Merci beaucoup à ceux qui prennent le temps de m'aider!
Bisous.
Ninette :o) "
Voilà en espérant que tu pourras m'aider!!!
(en tout cas ton site excelabo est tres tres bien!!!!! )-----Message d'origine-----
Bonjour Ninette,
Ici nous sommes tous des mages... C'est bien connu. D'ailleurs à
cause de cela je me demande encore comment d'autres forums peuvent
coexister avec le notre ;-)
Si au lieu de nous balancer le code, tu nous disais à quelle
question il t'a été proposé comme réponse ? Que veux tu faire, où
est ce que ça coince, quel est le pb ? Ca marche pas c'est un peu
court comme explication !
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo ! =========== >>
"Ninette13" a écrit dans le message de news:
076901c35287$b673c990$
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:úlse
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
Bonjour mage!
Je suis désolée, ma question était posée juste en
dessous!!!
Je te copie colle le message!
" Bonjour!!!!
Jusqu'ici, lorsque je voulais rapatrier des données d'une
page html sur un tableau excel, il fallait que j'aille sur
le web, que je fasse un copier coller vers ma feuille
excel... Lorsqu'il y a beaucoup de données, cela prend un
temps fou!
Je voulais donc créer si c'est possible, une macro qui
automatise l'ouverture de la page et le rapatriement. Je
ne sais pas comment faire et j'ai besoin de vos lumières!!!
Merci beaucoup à ceux qui prennent le temps de m'aider!
Bisous.
Ninette :o) "
Voilà en espérant que tu pourras m'aider!!!
(en tout cas ton site excelabo est tres tres bien!!!!! )
-----Message d'origine-----
Bonjour Ninette,
Ici nous sommes tous des mages... C'est bien connu. D'ailleurs à
cause de cela je me demande encore comment d'autres forums peuvent
coexister avec le notre ;-)
Si au lieu de nous balancer le code, tu nous disais à quelle
question il t'a été proposé comme réponse ? Que veux tu faire, où
est ce que ça coince, quel est le pb ? Ca marche pas c'est un peu
court comme explication !
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo ! =========== >>
"Ninette13" <joe8279@caramail.com> a écrit dans le message de news:
076901c35287$b673c990$a501280a@phx.gbl...
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:úlse
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
Bonjour mage!
Je suis désolée, ma question était posée juste en
dessous!!!
Je te copie colle le message!
" Bonjour!!!!
Jusqu'ici, lorsque je voulais rapatrier des données d'une
page html sur un tableau excel, il fallait que j'aille sur
le web, que je fasse un copier coller vers ma feuille
excel... Lorsqu'il y a beaucoup de données, cela prend un
temps fou!
Je voulais donc créer si c'est possible, une macro qui
automatise l'ouverture de la page et le rapatriement. Je
ne sais pas comment faire et j'ai besoin de vos lumières!!!
Merci beaucoup à ceux qui prennent le temps de m'aider!
Bisous.
Ninette :o) "
Voilà en espérant que tu pourras m'aider!!!
(en tout cas ton site excelabo est tres tres bien!!!!! )-----Message d'origine-----
Bonjour Ninette,
Ici nous sommes tous des mages... C'est bien connu. D'ailleurs à
cause de cela je me demande encore comment d'autres forums peuvent
coexister avec le notre ;-)
Si au lieu de nous balancer le code, tu nous disais à quelle
question il t'a été proposé comme réponse ? Que veux tu faire, où
est ce que ça coince, quel est le pb ? Ca marche pas c'est un peu
court comme explication !
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo ! =========== >>
"Ninette13" a écrit dans le message de news:
076901c35287$b673c990$
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:úlse
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
-----Message d'origine-----
Re bonjour Ninette,
S'il te plait, commence par aller lire la page connection
sur excelabo pour
voir comment suivre le forum avec un lecteur de news. Ta
notion de juste en
dessous est pour le moins floue ! entre temps il y a déjà
eu 6 nouvelles
questions. Un lecteur de news regroupe les questions
réponses dans une même
"ficelle" ce qui facilite grandement la lecture. En tous
cas pour apporter
un complément à une de tes interventions, tu fais
simplement répondre à en
te répondant à toi même...
Pour ta question. Le site de devrait grandement
t'aider. Des outils sont
prévus d'emblée dans excel pour lancer des requetes web
et rappatrier les
pages.
Il a tout un chapitre sur son site consacré à ce sujet et
c'est sa fête
aujourd'hui :-)
http://jacxl.free.fr
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" a écrit dans le
message de news:
08e601c3528c$e70fd760$
Bonjour mage!
Je suis désolée, ma question était posée juste en
dessous!!!
Je te copie colle le message!
" Bonjour!!!!
Jusqu'ici, lorsque je voulais rapatrier des données d'une
page html sur un tableau excel, il fallait que j'aille sur
le web, que je fasse un copier coller vers ma feuille
excel... Lorsqu'il y a beaucoup de données, cela prend un
temps fou!
Je voulais donc créer si c'est possible, une macro qui
automatise l'ouverture de la page et le rapatriement. Je
ne sais pas comment faire et j'ai besoin de vos
lumières!!!
Merci beaucoup à ceux qui prennent le temps de m'aider!
Bisous.
Ninette :o) "
Voilà en espérant que tu pourras m'aider!!!
(en tout cas ton site excelabo est tres tres bien!!!!! )-----Message d'origine-----
Bonjour Ninette,
Ici nous sommes tous des mages... C'est bien connu.
D'ailleurs à cause decela je me demande encore comment d'autres forums peuvent
coexister avec lenotre ;-)
Si au lieu de nous balancer le code, tu nous disais à
quelle question il t'aété proposé comme réponse ? Que veux tu faire, où est ce
que ça coince, quelest le pb ? Ca marche pas c'est un peu court comme
explication !
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" a écrit dans le
message de news:076901c35287$b673c990$
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:úlse
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
.
-----Message d'origine-----
Re bonjour Ninette,
S'il te plait, commence par aller lire la page connection
sur excelabo pour
voir comment suivre le forum avec un lecteur de news. Ta
notion de juste en
dessous est pour le moins floue ! entre temps il y a déjà
eu 6 nouvelles
questions. Un lecteur de news regroupe les questions
réponses dans une même
"ficelle" ce qui facilite grandement la lecture. En tous
cas pour apporter
un complément à une de tes interventions, tu fais
simplement répondre à en
te répondant à toi même...
Pour ta question. Le site de J@c devrait grandement
t'aider. Des outils sont
prévus d'emblée dans excel pour lancer des requetes web
et rappatrier les
pages.
Il a tout un chapitre sur son site consacré à ce sujet et
c'est sa fête
aujourd'hui :-)
http://jacxl.free.fr
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" <Joe8279@caramail.com> a écrit dans le
message de news:
08e601c3528c$e70fd760$a301280a@phx.gbl...
Bonjour mage!
Je suis désolée, ma question était posée juste en
dessous!!!
Je te copie colle le message!
" Bonjour!!!!
Jusqu'ici, lorsque je voulais rapatrier des données d'une
page html sur un tableau excel, il fallait que j'aille sur
le web, que je fasse un copier coller vers ma feuille
excel... Lorsqu'il y a beaucoup de données, cela prend un
temps fou!
Je voulais donc créer si c'est possible, une macro qui
automatise l'ouverture de la page et le rapatriement. Je
ne sais pas comment faire et j'ai besoin de vos
lumières!!!
Merci beaucoup à ceux qui prennent le temps de m'aider!
Bisous.
Ninette :o) "
Voilà en espérant que tu pourras m'aider!!!
(en tout cas ton site excelabo est tres tres bien!!!!! )
-----Message d'origine-----
Bonjour Ninette,
Ici nous sommes tous des mages... C'est bien connu.
D'ailleurs à cause de
cela je me demande encore comment d'autres forums peuvent
coexister avec le
notre ;-)
Si au lieu de nous balancer le code, tu nous disais à
quelle question il t'a
été proposé comme réponse ? Que veux tu faire, où est ce
que ça coince, quel
est le pb ? Ca marche pas c'est un peu court comme
explication !
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" <joe8279@caramail.com> a écrit dans le
message de news:
076901c35287$b673c990$a501280a@phx.gbl...
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:=False
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
.
-----Message d'origine-----
Re bonjour Ninette,
S'il te plait, commence par aller lire la page connection
sur excelabo pour
voir comment suivre le forum avec un lecteur de news. Ta
notion de juste en
dessous est pour le moins floue ! entre temps il y a déjà
eu 6 nouvelles
questions. Un lecteur de news regroupe les questions
réponses dans une même
"ficelle" ce qui facilite grandement la lecture. En tous
cas pour apporter
un complément à une de tes interventions, tu fais
simplement répondre à en
te répondant à toi même...
Pour ta question. Le site de devrait grandement
t'aider. Des outils sont
prévus d'emblée dans excel pour lancer des requetes web
et rappatrier les
pages.
Il a tout un chapitre sur son site consacré à ce sujet et
c'est sa fête
aujourd'hui :-)
http://jacxl.free.fr
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" a écrit dans le
message de news:
08e601c3528c$e70fd760$
Bonjour mage!
Je suis désolée, ma question était posée juste en
dessous!!!
Je te copie colle le message!
" Bonjour!!!!
Jusqu'ici, lorsque je voulais rapatrier des données d'une
page html sur un tableau excel, il fallait que j'aille sur
le web, que je fasse un copier coller vers ma feuille
excel... Lorsqu'il y a beaucoup de données, cela prend un
temps fou!
Je voulais donc créer si c'est possible, une macro qui
automatise l'ouverture de la page et le rapatriement. Je
ne sais pas comment faire et j'ai besoin de vos
lumières!!!
Merci beaucoup à ceux qui prennent le temps de m'aider!
Bisous.
Ninette :o) "
Voilà en espérant que tu pourras m'aider!!!
(en tout cas ton site excelabo est tres tres bien!!!!! )-----Message d'origine-----
Bonjour Ninette,
Ici nous sommes tous des mages... C'est bien connu.
D'ailleurs à cause decela je me demande encore comment d'autres forums peuvent
coexister avec lenotre ;-)
Si au lieu de nous balancer le code, tu nous disais à
quelle question il t'aété proposé comme réponse ? Que veux tu faire, où est ce
que ça coince, quelest le pb ? Ca marche pas c'est un peu court comme
explication !
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" a écrit dans le
message de news:076901c35287$b673c990$
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:úlse
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
.
-----Message d'origine-----
Re bonjour Ninette,
S'il te plait, commence par aller lire la page connection
sur excelabo pour
voir comment suivre le forum avec un lecteur de news. Ta
notion de juste en
dessous est pour le moins floue ! entre temps il y a déjà
eu 6 nouvelles
questions. Un lecteur de news regroupe les questions
réponses dans une même
"ficelle" ce qui facilite grandement la lecture. En tous
cas pour apporter
un complément à une de tes interventions, tu fais
simplement répondre à en
te répondant à toi même...
Pour ta question. Le site de devrait grandement
t'aider. Des outils sont
prévus d'emblée dans excel pour lancer des requetes web
et rappatrier les
pages.
Il a tout un chapitre sur son site consacré à ce sujet et
c'est sa fête
aujourd'hui :-)
http://jacxl.free.fr
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" a écrit dans le
message de news:
08e601c3528c$e70fd760$
Bonjour mage!
Je suis désolée, ma question était posée juste en
dessous!!!
Je te copie colle le message!
" Bonjour!!!!
Jusqu'ici, lorsque je voulais rapatrier des données d'une
page html sur un tableau excel, il fallait que j'aille sur
le web, que je fasse un copier coller vers ma feuille
excel... Lorsqu'il y a beaucoup de données, cela prend un
temps fou!
Je voulais donc créer si c'est possible, une macro qui
automatise l'ouverture de la page et le rapatriement. Je
ne sais pas comment faire et j'ai besoin de vos
lumières!!!
Merci beaucoup à ceux qui prennent le temps de m'aider!
Bisous.
Ninette :o) "
Voilà en espérant que tu pourras m'aider!!!
(en tout cas ton site excelabo est tres tres bien!!!!! )-----Message d'origine-----
Bonjour Ninette,
Ici nous sommes tous des mages... C'est bien connu.
D'ailleurs à cause decela je me demande encore comment d'autres forums peuvent
coexister avec lenotre ;-)
Si au lieu de nous balancer le code, tu nous disais à
quelle question il t'aété proposé comme réponse ? Que veux tu faire, où est ce
que ça coince, quelest le pb ? Ca marche pas c'est un peu court comme
explication !
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" a écrit dans le
message de news:076901c35287$b673c990$
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:úlse
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
.
-----Message d'origine-----
Re bonjour Ninette,
S'il te plait, commence par aller lire la page connection
sur excelabo pour
voir comment suivre le forum avec un lecteur de news. Ta
notion de juste en
dessous est pour le moins floue ! entre temps il y a déjà
eu 6 nouvelles
questions. Un lecteur de news regroupe les questions
réponses dans une même
"ficelle" ce qui facilite grandement la lecture. En tous
cas pour apporter
un complément à une de tes interventions, tu fais
simplement répondre à en
te répondant à toi même...
Pour ta question. Le site de J@c devrait grandement
t'aider. Des outils sont
prévus d'emblée dans excel pour lancer des requetes web
et rappatrier les
pages.
Il a tout un chapitre sur son site consacré à ce sujet et
c'est sa fête
aujourd'hui :-)
http://jacxl.free.fr
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" <Joe8279@caramail.com> a écrit dans le
message de news:
08e601c3528c$e70fd760$a301280a@phx.gbl...
Bonjour mage!
Je suis désolée, ma question était posée juste en
dessous!!!
Je te copie colle le message!
" Bonjour!!!!
Jusqu'ici, lorsque je voulais rapatrier des données d'une
page html sur un tableau excel, il fallait que j'aille sur
le web, que je fasse un copier coller vers ma feuille
excel... Lorsqu'il y a beaucoup de données, cela prend un
temps fou!
Je voulais donc créer si c'est possible, une macro qui
automatise l'ouverture de la page et le rapatriement. Je
ne sais pas comment faire et j'ai besoin de vos
lumières!!!
Merci beaucoup à ceux qui prennent le temps de m'aider!
Bisous.
Ninette :o) "
Voilà en espérant que tu pourras m'aider!!!
(en tout cas ton site excelabo est tres tres bien!!!!! )
-----Message d'origine-----
Bonjour Ninette,
Ici nous sommes tous des mages... C'est bien connu.
D'ailleurs à cause de
cela je me demande encore comment d'autres forums peuvent
coexister avec le
notre ;-)
Si au lieu de nous balancer le code, tu nous disais à
quelle question il t'a
été proposé comme réponse ? Que veux tu faire, où est ce
que ça coince, quel
est le pb ? Ca marche pas c'est un peu court comme
explication !
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" <joe8279@caramail.com> a écrit dans le
message de news:
076901c35287$b673c990$a501280a@phx.gbl...
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:=False
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
.
-----Message d'origine-----
Re bonjour Ninette,
S'il te plait, commence par aller lire la page connection
sur excelabo pour
voir comment suivre le forum avec un lecteur de news. Ta
notion de juste en
dessous est pour le moins floue ! entre temps il y a déjà
eu 6 nouvelles
questions. Un lecteur de news regroupe les questions
réponses dans une même
"ficelle" ce qui facilite grandement la lecture. En tous
cas pour apporter
un complément à une de tes interventions, tu fais
simplement répondre à en
te répondant à toi même...
Pour ta question. Le site de devrait grandement
t'aider. Des outils sont
prévus d'emblée dans excel pour lancer des requetes web
et rappatrier les
pages.
Il a tout un chapitre sur son site consacré à ce sujet et
c'est sa fête
aujourd'hui :-)
http://jacxl.free.fr
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" a écrit dans le
message de news:
08e601c3528c$e70fd760$
Bonjour mage!
Je suis désolée, ma question était posée juste en
dessous!!!
Je te copie colle le message!
" Bonjour!!!!
Jusqu'ici, lorsque je voulais rapatrier des données d'une
page html sur un tableau excel, il fallait que j'aille sur
le web, que je fasse un copier coller vers ma feuille
excel... Lorsqu'il y a beaucoup de données, cela prend un
temps fou!
Je voulais donc créer si c'est possible, une macro qui
automatise l'ouverture de la page et le rapatriement. Je
ne sais pas comment faire et j'ai besoin de vos
lumières!!!
Merci beaucoup à ceux qui prennent le temps de m'aider!
Bisous.
Ninette :o) "
Voilà en espérant que tu pourras m'aider!!!
(en tout cas ton site excelabo est tres tres bien!!!!! )-----Message d'origine-----
Bonjour Ninette,
Ici nous sommes tous des mages... C'est bien connu.
D'ailleurs à cause decela je me demande encore comment d'autres forums peuvent
coexister avec lenotre ;-)
Si au lieu de nous balancer le code, tu nous disais à
quelle question il t'aété proposé comme réponse ? Que veux tu faire, où est ce
que ça coince, quelest le pb ? Ca marche pas c'est un peu court comme
explication !
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" a écrit dans le
message de news:076901c35287$b673c990$
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:úlse
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
.
-----Message d'origine-----
http://office.microsoft.com/frc/assistance/2002/articles/G
etDataFromTheWebInExcel.aspx
"Ninette13" a écrit dans le
message de
news:076901c35287$b673c990$
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:úlse
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
-----Message d'origine-----
http://office.microsoft.com/frc/assistance/2002/articles/G
etDataFromTheWebInExcel.aspx
"Ninette13" <joe8279@caramail.com> a écrit dans le
message de
news:076901c35287$b673c990$a501280a@phx.gbl...
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:=False
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
-----Message d'origine-----
http://office.microsoft.com/frc/assistance/2002/articles/G
etDataFromTheWebInExcel.aspx
"Ninette13" a écrit dans le
message de
news:076901c35287$b673c990$
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:úlse
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
-----Message d'origine-----
Juste en dessous signifie que quelques messages plus bas,
il y a un message de moi même datant du 25/07/2003 ( donc
aujourd'hui )avec l'heure 12:56AM ( qui est plutot
étrange... déjà parce qu'il était près de 10 du mat et
que
12h56 AM ca n'existe pas mais passons ce n'est pas le
sujet!). Ensuite je n'ai pas répondu à ma question mais
j'ai apporté le code que quelqu'un m'a donné sur un autre
site (parce que oui misange tu n'as pas le monopole
désolée!) qui ne marche pas ( le code bien sur ) comme je
ne m'y connais pas en VBA je vous ai fourni ce code en
vue
d'une quelconque amélioration si l'erreur est flagrante
pour quelqu'un de ton niveau!
Pour la ficelle je suis d'accord j'ai merdé mais j'ai
voulu réparrer mon erreur cependant je ne parviens pas à
effacer le message auquel tu as répondu ( malgré tes
conseils sur la page connexion d'excelabo que j'ai lue et
oui ma grande!!!!! )
Voilà je te remercie quand même du site que tu m'as
conseillée mais c pas parce que tu es plutot bien callée
qu'il faut te la péter face à quelqu'un de bidon! Que tu
ais 20 ans ou 50 ( je ne sais pas )c'est pareil si on te
demande conseil, c'est qu'on ne sait pas le faire et pas
parce qu'on veut te faire chier!
Merci!-----Message d'origine-----
Re bonjour Ninette,
S'il te plait, commence par aller lire la page
connection
sur excelabo pourvoir comment suivre le forum avec un lecteur de news. Ta
notion de juste endessous est pour le moins floue ! entre temps il y a
déjà
eu 6 nouvellesquestions. Un lecteur de news regroupe les questions
réponses dans une même"ficelle" ce qui facilite grandement la lecture. En tous
cas pour apporterun complément à une de tes interventions, tu fais
simplement répondre à ente répondant à toi même...
Pour ta question. Le site de devrait grandement
t'aider. Des outils sontprévus d'emblée dans excel pour lancer des requetes web
et rappatrier lespages.
Il a tout un chapitre sur son site consacré à ce sujet
et
c'est sa fêteaujourd'hui :-)
http://jacxl.free.fr
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" a écrit dans le
message de news:08e601c3528c$e70fd760$
Bonjour mage!
Je suis désolée, ma question était posée juste en
dessous!!!
Je te copie colle le message!
" Bonjour!!!!
Jusqu'ici, lorsque je voulais rapatrier des données d'une
page html sur un tableau excel, il fallait que j'aille
sur
le web, que je fasse un copier coller vers ma feuille
excel... Lorsqu'il y a beaucoup de données, cela prend un
temps fou!
Je voulais donc créer si c'est possible, une macro qui
automatise l'ouverture de la page et le rapatriement. Je
ne sais pas comment faire et j'ai besoin de vos
lumières!!!
Merci beaucoup à ceux qui prennent le temps de m'aider!
Bisous.
Ninette :o) "
Voilà en espérant que tu pourras m'aider!!!
(en tout cas ton site excelabo est tres tres bien!!!!! )-----Message d'origine-----
Bonjour Ninette,
Ici nous sommes tous des mages... C'est bien connu.
D'ailleurs à cause decela je me demande encore comment d'autres forums
peuvent
coexister avec lenotre ;-)
Si au lieu de nous balancer le code, tu nous disais à
quelle question il t'aété proposé comme réponse ? Que veux tu faire, où est ce
que ça coince, quelest le pb ? Ca marche pas c'est un peu court comme
explication !
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" a écrit dans le
message de news:076901c35287$b673c990$
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:úlse
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
.
.
-----Message d'origine-----
Juste en dessous signifie que quelques messages plus bas,
il y a un message de moi même datant du 25/07/2003 ( donc
aujourd'hui )avec l'heure 12:56AM ( qui est plutot
étrange... déjà parce qu'il était près de 10 du mat et
que
12h56 AM ca n'existe pas mais passons ce n'est pas le
sujet!). Ensuite je n'ai pas répondu à ma question mais
j'ai apporté le code que quelqu'un m'a donné sur un autre
site (parce que oui misange tu n'as pas le monopole
désolée!) qui ne marche pas ( le code bien sur ) comme je
ne m'y connais pas en VBA je vous ai fourni ce code en
vue
d'une quelconque amélioration si l'erreur est flagrante
pour quelqu'un de ton niveau!
Pour la ficelle je suis d'accord j'ai merdé mais j'ai
voulu réparrer mon erreur cependant je ne parviens pas à
effacer le message auquel tu as répondu ( malgré tes
conseils sur la page connexion d'excelabo que j'ai lue et
oui ma grande!!!!! )
Voilà je te remercie quand même du site que tu m'as
conseillée mais c pas parce que tu es plutot bien callée
qu'il faut te la péter face à quelqu'un de bidon! Que tu
ais 20 ans ou 50 ( je ne sais pas )c'est pareil si on te
demande conseil, c'est qu'on ne sait pas le faire et pas
parce qu'on veut te faire chier!
Merci!
-----Message d'origine-----
Re bonjour Ninette,
S'il te plait, commence par aller lire la page
connection
sur excelabo pour
voir comment suivre le forum avec un lecteur de news. Ta
notion de juste en
dessous est pour le moins floue ! entre temps il y a
déjà
eu 6 nouvelles
questions. Un lecteur de news regroupe les questions
réponses dans une même
"ficelle" ce qui facilite grandement la lecture. En tous
cas pour apporter
un complément à une de tes interventions, tu fais
simplement répondre à en
te répondant à toi même...
Pour ta question. Le site de J@c devrait grandement
t'aider. Des outils sont
prévus d'emblée dans excel pour lancer des requetes web
et rappatrier les
pages.
Il a tout un chapitre sur son site consacré à ce sujet
et
c'est sa fête
aujourd'hui :-)
http://jacxl.free.fr
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" <Joe8279@caramail.com> a écrit dans le
message de news:
08e601c3528c$e70fd760$a301280a@phx.gbl...
Bonjour mage!
Je suis désolée, ma question était posée juste en
dessous!!!
Je te copie colle le message!
" Bonjour!!!!
Jusqu'ici, lorsque je voulais rapatrier des données d'une
page html sur un tableau excel, il fallait que j'aille
sur
le web, que je fasse un copier coller vers ma feuille
excel... Lorsqu'il y a beaucoup de données, cela prend un
temps fou!
Je voulais donc créer si c'est possible, une macro qui
automatise l'ouverture de la page et le rapatriement. Je
ne sais pas comment faire et j'ai besoin de vos
lumières!!!
Merci beaucoup à ceux qui prennent le temps de m'aider!
Bisous.
Ninette :o) "
Voilà en espérant que tu pourras m'aider!!!
(en tout cas ton site excelabo est tres tres bien!!!!! )
-----Message d'origine-----
Bonjour Ninette,
Ici nous sommes tous des mages... C'est bien connu.
D'ailleurs à cause de
cela je me demande encore comment d'autres forums
peuvent
coexister avec le
notre ;-)
Si au lieu de nous balancer le code, tu nous disais à
quelle question il t'a
été proposé comme réponse ? Que veux tu faire, où est ce
que ça coince, quel
est le pb ? Ca marche pas c'est un peu court comme
explication !
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" <joe8279@caramail.com> a écrit dans le
message de news:
076901c35287$b673c990$a501280a@phx.gbl...
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:=False
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
.
.
-----Message d'origine-----
Juste en dessous signifie que quelques messages plus bas,
il y a un message de moi même datant du 25/07/2003 ( donc
aujourd'hui )avec l'heure 12:56AM ( qui est plutot
étrange... déjà parce qu'il était près de 10 du mat et
que
12h56 AM ca n'existe pas mais passons ce n'est pas le
sujet!). Ensuite je n'ai pas répondu à ma question mais
j'ai apporté le code que quelqu'un m'a donné sur un autre
site (parce que oui misange tu n'as pas le monopole
désolée!) qui ne marche pas ( le code bien sur ) comme je
ne m'y connais pas en VBA je vous ai fourni ce code en
vue
d'une quelconque amélioration si l'erreur est flagrante
pour quelqu'un de ton niveau!
Pour la ficelle je suis d'accord j'ai merdé mais j'ai
voulu réparrer mon erreur cependant je ne parviens pas à
effacer le message auquel tu as répondu ( malgré tes
conseils sur la page connexion d'excelabo que j'ai lue et
oui ma grande!!!!! )
Voilà je te remercie quand même du site que tu m'as
conseillée mais c pas parce que tu es plutot bien callée
qu'il faut te la péter face à quelqu'un de bidon! Que tu
ais 20 ans ou 50 ( je ne sais pas )c'est pareil si on te
demande conseil, c'est qu'on ne sait pas le faire et pas
parce qu'on veut te faire chier!
Merci!-----Message d'origine-----
Re bonjour Ninette,
S'il te plait, commence par aller lire la page
connection
sur excelabo pourvoir comment suivre le forum avec un lecteur de news. Ta
notion de juste endessous est pour le moins floue ! entre temps il y a
déjà
eu 6 nouvellesquestions. Un lecteur de news regroupe les questions
réponses dans une même"ficelle" ce qui facilite grandement la lecture. En tous
cas pour apporterun complément à une de tes interventions, tu fais
simplement répondre à ente répondant à toi même...
Pour ta question. Le site de devrait grandement
t'aider. Des outils sontprévus d'emblée dans excel pour lancer des requetes web
et rappatrier lespages.
Il a tout un chapitre sur son site consacré à ce sujet
et
c'est sa fêteaujourd'hui :-)
http://jacxl.free.fr
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" a écrit dans le
message de news:08e601c3528c$e70fd760$
Bonjour mage!
Je suis désolée, ma question était posée juste en
dessous!!!
Je te copie colle le message!
" Bonjour!!!!
Jusqu'ici, lorsque je voulais rapatrier des données d'une
page html sur un tableau excel, il fallait que j'aille
sur
le web, que je fasse un copier coller vers ma feuille
excel... Lorsqu'il y a beaucoup de données, cela prend un
temps fou!
Je voulais donc créer si c'est possible, une macro qui
automatise l'ouverture de la page et le rapatriement. Je
ne sais pas comment faire et j'ai besoin de vos
lumières!!!
Merci beaucoup à ceux qui prennent le temps de m'aider!
Bisous.
Ninette :o) "
Voilà en espérant que tu pourras m'aider!!!
(en tout cas ton site excelabo est tres tres bien!!!!! )-----Message d'origine-----
Bonjour Ninette,
Ici nous sommes tous des mages... C'est bien connu.
D'ailleurs à cause decela je me demande encore comment d'autres forums
peuvent
coexister avec lenotre ;-)
Si au lieu de nous balancer le code, tu nous disais à
quelle question il t'aété proposé comme réponse ? Que veux tu faire, où est ce
que ça coince, quelest le pb ? Ca marche pas c'est un peu court comme
explication !
--
Misange migrateuse http://www.excelabo.net
==Attention, Disciplus a migré et devient excelabo !
============
"Ninette13" a écrit dans le
message de news:076901c35287$b673c990$
On m'a passé le code suivant sur un autre forum:
Sub RapaTriementVBFR()
Sheets("Temporaire").Activate
With ActiveSheet.QueryTables.Add
(Connection:="URL;http://www.vbfrance.com",
Destination:=Range("A1"))
..Name = "www.vbfrance" 'Le nom, met ce ke tu ve
..FieldNames = True
..RowNumbers = False
..FillAdjacentFormulas = False
..PreserveFormatting = True
..RefreshOnFileOpen = False
..BackgroundQuery = True
..RefreshStyle = xlInsertDeleteCells
..SavePassword = False
..SaveData = True
..AdjustColumnWidth = True
..RefreshPeriod = 0
..WebSelectionType = xlEntirePage
..WebFormatting = xlWebFormattingNone
..WebPreFormattedTextToColumns = True
..WebConsecutiveDelimitersAsOne = True
..WebSingleBlockTextImport = False
..WebDisableDateRecognition = False
..WebDisableRedirections = False
..Refresh BackgroundQuery:úlse
End With
End Sub
Le problème c'est que ça ne marche pas mais ça peut peut
être vous aider... Moi je ne trouve pas!!!
Merci encore!!!
.
.
.