Søg
Avatar billede mfj1 Nybegynder
21. oktober 2002 - 17:12 Der er 12 kommentarer og
1 løsning

Samme ""sti"" ved server skift??

Hej Eksperter.

Jeg har udviklet et lille program i Excel med god hjælp af bl.a. ”Eksperter”, men jeg har en lille opgave som jeg ikke kan løse.

I flere af Makroerne er nogle filers placering angivet, eks.:

ss = "'C:\[JOBnrMed_Tekst.xls]Sheet1'!$A$3

eller

ss = "'O:\WW\UGE\Time[JOBnrMed_Tekst.xls]Sheet1'!$A$3

Da jeg vil (skal) prøve at installer programmet  på mindst 7 forskellige server, vil jeg gerne kunne gøre det uden, at skulle ind og rette i Makroerne 3-4 forskellige steder hver gang. Er der nogen forslag???

Mfj1
Avatar billede a1a1 Novice
21. oktober 2002 - 17:19 #1
prøv evt.

ss = App.Path & [JOBnrMed_Tekst.xls]Sheet1'!$A$3

?

app.path henviser til der hvor applikationen køres fra (i Visual basic)

;)
Avatar billede kabbak Professor
21. oktober 2002 - 17:20 #2
Hvis du altid installere altpå roden, behøver du ikke drevbogstavet,
\ bagslach og sten er nok
Avatar billede kabbak Professor
21. oktober 2002 - 17:20 #3
sten = stien
Avatar billede bak Forsker
21. oktober 2002 - 17:24 #4
application.path giver stien hvor excel er installeret
du kan måske bruge
ss=ActiveWorkbook.Path & "\" & [JOBnrMed_Tekst.xls]Sheet1'!$A$3
Avatar billede bak Forsker
21. oktober 2002 - 17:25 #5
Hvis de ligger samme sted.... :-)
Avatar billede mfj1 Nybegynder
21. oktober 2002 - 17:47 #6
Som ny i Excel vil jeg gerne spørge ind til svarene.
Er f.eks. denne linie:
ss=ActiveWorkbook.Path & "\" & [JOBnrMed_Tekst.xls]Sheet1'!$A$3

Lig med  denne sti? O:\WW\UGE\Time[JOBnrMed_Tekst.xls]Sheet1'!$A$3

Filen ”JOBnrMed_Tekst.xls SKAL altid ligge i mappen Time på denne server, men det kan være en anden mappe på en anden server.

Jeg vil afprøvet det i morgen på arbejde, hvis jeg har forstået det rigtigt.
Avatar billede bak Forsker
21. oktober 2002 - 20:03 #7
Nej, activeworkbook.path giver desværre stien til den fil den startes i og i dit tilfælde vil dette nok ikke være godt.
Så vidt jeg husker fra dine andre spm. skal netop denne fil ligge centralt og kunne kaldes fra en hel række af underbiblioteker.
For at lave det her er jeg nødt til at kende strukturen af de biblioteker du bruger til programmet.
Avatar billede bak Forsker
21. oktober 2002 - 20:07 #8
Da jeg går ud fra at strukturen er ens fra installation til installation (at det blot er forskellige servere) kan du sende mig et screendump (i stifinder, tryk på print screen, indsæt i word) til
tommybak@netscape.net
Avatar billede mfj1 Nybegynder
21. oktober 2002 - 21:39 #9
Hej Bak.
mailen er sendt.
Avatar billede bak Forsker
22. oktober 2002 - 10:10 #10
Ok, filen [JOBnrMed_Tekst.xls] ligger altså altid 1 niveau over filen son kalder på den. Det betyder at du kan bruge denne metode:

ss = "'" & Left(ThisWorkbook.Path, InStrRev(ThisWorkbook.Path, "\"))
ss = ss & "[JOBnrMed_Tekst.xls]Sheet1'!$A$3:$B$500,2,false"
Avatar billede bak Forsker
22. oktober 2002 - 10:16 #11
ps.... virker kun i xl2000 og højere. hvis du bruger xl97 skal det laves lidt om.

ss = "'" & Left(ThisWorkbook.Path, InStrRev(ThisWorkbook.Path, "\"))

finder det bibliotek, som den aktuelle fil ligger i og går et niveau op.
Avatar billede mfj1 Nybegynder
22. oktober 2002 - 18:00 #12
Hej Bak!
Det funger perfekt både her hjemme og på arbejde.
Her er lidt point. Tak
Avatar billede mfj1 Nybegynder
22. oktober 2002 - 18:02 #13
a1 og kabbak, jeg ligger lige et spørgsmål "a1 og kabbak" så I også kan få lidt point, jeg lært ihvertfald noget nyt, tak.
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
Excel kurser
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig
Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
VB, Lægge 2 celler sammen og skrive den i cellen ved side af Af MC3390 i Excel 9 23/09/202618:11 24/09/202611:16
Ændre tal i en celle Af xvid i Excel 1 04/09/202616:05 04/09/202616:54
Kan Excel selv beregne alder? Af leahcim i Excel 7 31/08/202610:24 04/09/202602:08
problem med mailbesked Af Pestilensen i Excel 3 24/08/202611:16 28/08/202612:55
Sætte billeder ind i google sheets ark ud fra elev nummer Af lurup i Excel 18 17/08/202615:14 05/09/202622:04
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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 16:15 Internet forsvinder hele tiden Af TTA i Internetforbindelser
23/0920:49 Fejl på Tv2 Play Af Bukse i Browsere
23/0918:11 VB, Lægge 2 celler sammen og skrive den i cellen ved side af Af MC3390 i Excel
21/0910:39 DBA er ikke hvad det tidligere var - desværre! Af ErikHg i Fri debat
18/0919:52 Libre office skriveprogram Af Frank i Office & Kontorpakker
White papers
Flere white papers »