macro avec VBA sur Word et Excel

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : macro avec VBA sur Word et Excel

Marys

je cherche à automatiser la mise à jour d' une documentation
pour ça, je voudrais me servir d'une macro, mais je manque de pratique
mon fichier d' origine est un document Word, il doit être travaillé sous Word pour différentes opérations (création d' un index, création de cotes alphanumériques, etc...), et ensuite transféré sur Excel ou ACCESS pour en faire une base de données
Sur Word, pas de problème mes macros fonctionnent bien , mais je ne sais pas comment faire pour transférer mes données sur Excel (automatiser avec une macro: ouverture d' un tableau Excel et copier-coller)
est-ce seulement possible?
je peux ouvrir avec une macro un nouveau document Word mais pas une feuille de calcul Excel
quelqu'un a-t-il une solution?
merci

Publicité

kiki29

Salut,un exemple basique pour tranférer une valeur d'un tableau Word vers Excel

Option Explicit

Sub Tst()
Dim oTable As Table
Dim xlApp As Object
Dim xlSheet As Object
Dim xlBook As Object
Dim a1 As String, a2 As String

Set oTable = ActiveDocument.Tables(1)

a1 = Len(Mid(oTable.Cell(1, 1), 7, 25))
a2 = Mid(oTable.Cell(1, 1), 7, a1)

Set xlApp = CreateObject("Excel.Application" )
Set xlBook = xlApp.Workbooks.Add
Set xlSheet = xlBook.Worksheets.Add

xlSheet.Cells(1, 1) = a2
xlApp.Visible = True

Set xlSheet = Nothing
Set xlBook = Nothing
Set xlApp = Nothing
End Sub

Message édité par kiki29 le 07-03-2009 à 11:27:01

jacob2010

Bonjour,

je me demande si tu as trouvé une solution à ton problème, je suis dans la meme situation que toi

merci de me repondre

Message cité 1 fois

produvba

Bonjour jacob2010,

Le code proposé par kiki29 devrait fonctionner,
Pour le comprendre, le taper dans Word et l'exécuter en pas à pas (avec F8).
Si cela n'est pas suffisant, pose une question plus explicite...

jacob2010 a écrit :

Bonjour,

je me demande si tu as trouvé une solution à ton problème, je suis dans la meme situation que toi

merci de me repondre

jacob2010

Merci de m'avoir répondu,

le code de kiki29 ne fonctionne pas dans mon cas.
ma question est la suivante comment je pourrais attaquer les cellules Excel en VBA dans le type "Feuille de calcule Excel" dans Word

merci

FORUM HardWare.fr

Programmation

VB/VBA/VBS

macro avec VBA sur Word et Excel

Sujets relatifs
VBA excel arreter macro via bouton	BESOIN DE CODE WORD VB
Comment créer des variables avec VBA?	Forumle VBA "entre..."
fusion excel réalisable	Monter Un lecteur reseau en VBA
gestion de fichiers excel à l'aide d'une macro spécifique	[VBA] piloter word depuis une macro excel -- Chercher remplacer
Plus de sujets relatifs à : macro avec VBA sur Word et Excel

Page générée en 0.052 secondes