Avatar billede goodwill Nybegynder
05. januar 2002 - 16:54 Der er 1 kommentar og
1 løsning

VBA-kode for regnearks filplacering

Hej alle,
Jeg udskifter billeder i en Label med:   
ActiveSheet.Label1.Picture = LoadPicture(\"C:\\dokumenter\\Mig1.bmp\")
Jeg har alle billedfiler liggende i samme mappe som regnearket, men hvis jeg flytter regnearket skal jeg ind og rette koderne, derfor....
har jeg brug for at kende mit regnearks aktuelle placering
og bruge den som stiangivelse.
:o)
Goodwill
Avatar billede jespernaur Nybegynder
05. januar 2002 - 17:37 #1
Prøv

Application.ActiveWorkBook.Path

du er muligvis nødt til at fjerne regneark-filnavnet med håndkraft.

Mvh
Jesper Naur
Avatar billede goodwill Nybegynder
05. januar 2002 - 18:49 #2
Hej,
tak for det, det virker fint..

Sub mig()
StrPath = Application.ActiveWorkbook.Path
StrPict = \"\\\" & \"mig1.bmp\"
StrTot = StrPath & StrPict
ActiveSheet.Label1.Picture = LoadPicture(StrTot)
End Sub

:o)
Goodwill
Avatar billede 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.

Loading billede Opret Preview
Kategori
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

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