Vraag : Kan ik Code die wordt gecre�ërd om Input in Word & Excel te automatiseren hebben?

Ik moet Word & doc. van Excel elke dag met mijn bijwerken: Naam, de titel van de Baan, huidige dagendatum, en ondertekend. />In zowel Word


I moet dit zelfde gegeven ingaan TELKENS ALS ik deze doc. gebruik. En ik ga door ongeveer 20 van deze doc. een dag. Zo aangezien u kunt zien, is het binnengaan in dat zelfde gegeven elke dag oude qucik.

It zou maken werkelijk mijn baan gemakkelijker zo veel geworden als ik een macroknoop op mijn Word en Excel had waar toen ik het klikte, het enkel de gebieden voor me bevolkte.

Is dat mogelijk?

Thanks.

Attachments:

van

8-24-2010-10-54-54-AM.jpg (184 KB)  (de Details van het Type van Dossier)  

het scherm print

style= " breedte

van

8-24-2010-11-04-25-AM.jpg (171 KB)  (de Details van het Type van Dossier)  

het scherm print

style= " breedte

Antwoord : Kan ik Code die wordt gecre�ërd om Input in Word & Excel te automatiseren hebben?

O.k., hier gaat u voor Word (mijn nachtmerrietoepassing)

Neem deze macro in uw normal.dot op

Sub FillMeIn ()
Schemerige wd als Document
Reeks wd = ActiveDocument
wd. Lijsten (1). Range.Cells (52). Range.Text = „John Burch“
wd. Lijsten (1). Range.Cells (54). Range.Text = „CNC Beheerder“
wd. Lijsten (1). Range.Cells (56). Range.Text = Datum
wd. Lijsten (1). Range.Cells (58). Range.Text = „via E-mail“
Sub van het eind

Als u niet het weet hoe te om dit te doen, kunt u dit doen

In menu gaat de bar naar Hulpmiddelen/Macro --> Macro
Vul „FillMeIn“ op het Macrogebied van de Naam in
Klik „creëren“

U zult nu in de toegankelijke Redacteur VBA (altijd door Alt+F11) aankomen en zult dit op de rechterkant zien

Sub GFGFG ()
'
'Macro GFGFG
De 'macro leidde tot 8/25/2010 door xxx
'

Sub van het eind

kleef nu de code hieronder tussen Sub () en Sub van het Eind

Verduister wd als Document
Plaats wd = ActiveDocument
wd. Lijsten (1). Range.Cells (52). Range.Text = „John Burch“
wd. Lijsten (1). Range.Cells (54). Range.Text = „CNC Beheerder“
wd. Lijsten (1). Range.Cells (56). Range.Text = Datum
wd. Lijsten (1). Range.Cells (58). Range.Text = „via E-mail“
Sub van het eind

Wijs nu de macro aan een kortere wegsleutel (toe zeg Alt+A)

In het menu van Word, ga naar Hulpmiddelen/pas aan
Op de bodem van het venster, klik de Customize knoop naast het Sluiten
In de lijst van Categorieën (hoogste Linkerzijde), scrol neer aan Macro's en selecteer het
In de lijst van Macro's, selecteer enkel gecre�ërde FillMeIn
Selecteer de nieuwe de kortere wegsleutel van de gebieds „Pers“
Druk nu Alt+A en controleer het in de nieuwe de kortere wegsleutel van de gebieds „Pers“ wordt gekopi�ërd
Klik toewijzen
Klik dicht

Test het door het door alt + a te lanceren