Excel -cum copiez automat date din Office Word fields

Vreau sa fac urmartorul lucru:

Am 52 - fisiere word - cu denumirea "Week 1"  pana la "Week 52"
-in word am fields -unde o sa completez, in viitor, cu numarul de ore si numarul de client


vreau un excel - in care sa copiez automat numarul de ore si numarul de client

ceva de genul:
week  ... .   numar ore ......numar client


cum pot sa fac asa ceva?

multumesc

Fiecare produs din pachetul Office expune un API prin care faci ce vrei: http://msdn.microsof...office.14).aspx

Edited by neagu_laurentiu, 12 April 2013 - 13:13.

Poti te rog sa fi mai explicit.

Folosind acele obiecte poti "manui" din VB o instanta Excel sau Word. Aloci obiectul, accesezi fiecare pagina, celula, rand, orice mai ai acolo. Si deci scriind o miniaplicatie realizezi ce vrei tu, ca si cum ai face manual doar ca mult mai repede prin acest automatism.

Edited by neagu_laurentiu, 12 April 2013 - 13:29.

te rog sa ma scuzi dar cu toate ca inteleg ideea de baza, nu am nici cea mai mica idee cum sa o pun in practica.
mai pt incepatori. te rog.

E plin netul de tutoriale: http://support.microsoft.com/kb/219151

Neagu daca stiam sa pun in practica aceste tutoriale nu mai intrebam. E usor sa raspunzi -"E plin netul de tutoriale"
Ce faci? colectie de raspunsuri? Daca raspunzi atunci raspunde serios, ce urmeaza sa ma trimiti sa citesc manualul de VBA?
Nu toata lumea stie programare. Trebuie sa intelegi ca cine cere ajutorul, aici, a incercat in prealabil sa puna in practica ce a citit in tutorialele e pe net dar nu a avut succes.

Public xlApp As excel.Application
Public wbxl As excel.Workbook
Public wDAT As excel.Worksheet
Dim sTABEL as String
sTABEL="c:\unde este tabelul tau.xls"
Set xlApp = CreateObject("Excel.Application")
Set wbxl = xlApp.Workbooks.Open(sTABEL)
Set wDAT = xlApp.Sheets(1)
'exemplu wDAT.Cells(rand, coloana).Value = variabila
wDAT.Cells(1, 1).Value = "Week"
wDAT.Cells(1, 2).Value = "Nr. de Ore"
wDAT.Cells(1, 3).Value = "Nr. Client"
wDAT.Cells(2, 1).Value = variabila saptamana
wDAT.Cells(2, 2).Value = variabila ore
wDAT.Cells(2, 3).Value = variabila client
wbxl.Save
xlApp.Workbooks.Close
Set xlApp = Nothing
nu uita de Project->References->Microsoft Excel 11.0(sau 10) Object Library

cam de aici poti porni.
bafta

pentru chestii din ce in ce mai elaborate va trebui totusi sa incepi de aici: http://msdn.microsof...office.11).aspx

si un sfat general, creaza Macro-uri intr-un excel, faci ce vrei in tabel si pe urma deschizi Macro-ul si vizualizazi codul aferent.
Evident, pentru al manipula din vb, trebui un pic adaptat, dar nu este chiar un cap de tara.

Edited by nexusm, 14 April 2013 - 13:48.

naurul, on 14 aprilie 2013 - 11:27, said:

Aici parca suntem pe aria programare ! Nu soft la cerere, nu altceva. Primesti indicatii acolo unde te impotmolesti (toti avem astfel de momente) cu privirea la programul ce vrei sa-l realizezi. Forumul nu tine loc de scoala si studiu, doar primesti ideea lipsa in momentul cu pricina.

Edited by neagu_laurentiu, 14 April 2013 - 13:48.

multumesc mult nexusm