Notifikationer

Markér alle som læst Log ud

puppetmaster Nybegynder

15. juli 2002 - 12:17 Der er 11 kommentarer og
1 løsning

Kopier fil fra Word (VBA)

Hvordan kunne koden (VBA) se ud til at gøre følgende:

Lægge en sikkerhedskopi af det åbne dokument i en given mappe på harddisken, dvs. at man efter proceduren STADIGVÆK skal arbejde videre på originalfilen, i den mappe hvorfra man nu har åbnet den.
Arbejdsgang:
Opret nyt dokument, skriv, gem på diskette, sikkerhedskopier på harddisk (det er her funktionen kommer ind), arbejde videre, gemme på disketten, sikkerhedskopiere på harddisk osv.

Synes godt om

puppetmaster Nybegynder

15. juli 2002 - 12:28 #1

Dette er hvad jeg har kunnet finde fremtil i Word-help:

Sub sikkerhedskopi()
myDocname = ActiveDocument.Name
pos = InStr(myDocname, ".")
If pos > 0 Then
myDocname = Left(myDocname, pos - 1)
myDocname = myDocname & ".txt"
ActiveDocument.SaveAs FileName:=myDocname, _
FileFormat:=wdFormatText
End If
End Sub

Men ovenstående åbner ikke den "originale" fil, den arbejder bare videre på kopien (.txt)!

Synes godt om

goatshrine Nybegynder

15. juli 2002 - 12:29 #2

Set WordApp = CreateObject("word.application")
Set WordDoc = WordApp.Documents.Add()
path="c:\palle.doc"
WordDoc.SaveAs path

Synes godt om

goatshrine Nybegynder

15. juli 2002 - 12:29 #3

hov :)
det var skam VB.. hehe sry

Synes godt om

goatshrine Nybegynder

15. juli 2002 - 12:37 #4

Sub Makebackup()
Dim Backupfile as String
dim currfile as string
with ActiveDocument

.save
'gemmer filen

currfile= .fullname
backupfile = "c:\backup.doc"
.SaveAs Filename:=Backupfile

end with
'nu skal backuppen lukkes da denne er aktiv.

ActiveDocument.close
'åben gammel
Documents.open Filenmae:=currfile
end sub

Håber det kan bruges.

Synes godt om

puppetmaster Nybegynder

15. juli 2002 - 12:45 #5

En lille omskrivning af dette

Backupfile = "c:\backup.doc"

Så det gemmer under det aktive navn i mappen C:\backup

Synes godt om

puppetmaster Nybegynder

15. juli 2002 - 12:45 #6

Så mangler der bare et svar........så får du dine (velfortjente) point...

Synes godt om

goatshrine Nybegynder

15. juli 2002 - 12:47 #7

svar :)

Synes godt om

goatshrine Nybegynder

15. juli 2002 - 12:48 #8

backupfile = "c:\backup\" & currfile
så gemmer den det under c:\backup\"docnavn"
husk at oprette mappen c:\backup.

Synes godt om

puppetmaster Nybegynder

15. juli 2002 - 12:49 #9

:)
(KAN du klare omskrivningen af ovenstående, jeg har forsøgt en del forskelligt, men intet virker)

Synes godt om

puppetmaster Nybegynder

15. juli 2002 - 12:49 #10

takker...

Synes godt om

puppetmaster Nybegynder

15. juli 2002 - 12:51 #11

Hmmm....den er ikke meget for at godtage det, skriver noget med at netværksdrevet ikke bla bla bla.....men det er jo på C: der skal gemmes....

Synes godt om

goatshrine Nybegynder

15. juli 2002 - 13:11 #12

prøv at udskrive de forskellige variabler uden at udføre kommandoerne. så kan du nemt se hvor fejlen ligger.

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Word kurser

Tag et kursus i Word og øg effektiviteten

Se alle Word kurser

Flere spørgsmål fra Word kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Kan man slette skrifter : Word : Windows 10 ? Af Ikke-ekspert i Word	10	28/09/202519:16	29/09/202511:57
WordMat Af jgormm i Word	3	21/09/202510:53	22/09/202512:57
alfabetisk rækkefølge i word på ipad Af PAN i Word	1	02/06/202514:13	02/06/202522:24
Word VBA: Check engelsk gramma og ret fejl Af Dan Elgaard i Word	3	30/04/202509:34	02/05/202509:13
Fed skrift Af camsti i Word	3	07/04/202518:36	07/04/202522:58

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS