Avatar billede marten123 Nybegynder
29. november 2007 - 12:12 Der er 16 kommentarer

open workbook

Hej,

Jeg skal åbne en workbook i en bestemt sti. Dette er intet problem, men hvordan kan jeg sige at:
Kun hvis workbook, hvor den første del er "standard....." findes skal denne åbnes?
Avatar billede jlemming Nybegynder
29. november 2007 - 14:02 #1
Prøv at beskrive lidt nærmere, er det f.eks. i vba?
Avatar billede marten123 Nybegynder
29. november 2007 - 15:00 #2
ja, hvad forstår du ikke?
Avatar billede marten123 Nybegynder
29. november 2007 - 15:01 #3
det er excel forum ik? skal man åbne en anden workbook i excel, må det nødvendigvis være vba
Avatar billede excelent Ekspert
29. november 2007 - 15:18 #4
kan man ikke åbne en workbook uden vba ?
Avatar billede jlemming Nybegynder
29. november 2007 - 15:21 #5
Du finder bare selv ud af det :-(
Avatar billede excelent Ekspert
29. november 2007 - 16:04 #6
ilemming kan du ikke lige sende mig en mail på pm@madsen.tdcadsl.dk
Avatar billede marten123 Nybegynder
29. november 2007 - 16:09 #7
Hvad nu? Det var nu ikke ment spydigt... men tak ellers
Avatar billede excelent Ekspert
29. november 2007 - 16:13 #8
nå ok, det kunne nu godt opfattes sådan :-)
Avatar billede marten123 Nybegynder
29. november 2007 - 16:16 #9
alright - sorry then, kan godt se det.
Avatar billede excelent Ekspert
29. november 2007 - 16:39 #10
mon ikke man kan bruge jokertegn til dette
prøv "standard*.xls"
Avatar billede marten123 Nybegynder
29. november 2007 - 16:54 #11
virker desværre ikke :(
Avatar billede excelent Ekspert
29. november 2007 - 16:57 #12
prøv lige at paste din kode her
Avatar billede marten123 Nybegynder
29. november 2007 - 17:12 #13
Workbooks.Open Filename:= _
    "http://xxxxx/standard file A50.xls", ReadOnly:=True
        template_wbk = ActiveWorkbook.Name
Avatar billede excelent Ekspert
29. november 2007 - 17:38 #14
jeg tror jeg har tabt tråden nu :-)
for som din kode ser ud, kan den jo ikke undgå at åbne en fil som starter med "standard" !!!
Avatar billede excelent Ekspert
29. november 2007 - 19:57 #15
Denne kan finde filer på HD, men jeg fik den ikke til at virke
på mit webhotel

Sub filefind()

With Application.FileSearch
.FileType = msoFileTypeExcelWorkbooks
.LookIn = "C:\Users\pm\Desktop\"
'.LookIn = "http://xxxxxx/"
  If .Execute() > 0 Then
    MsgBox "Fandt " & .FoundFiles.Count & " filer i valgt sti "
      For i = 1 To .FoundFiles.Count
        'MsgBox .FoundFiles(i)
        If .FoundFiles(i) Like "*standard*" Then Workbooks.Open Filename:=.FoundFiles(i): Exit For
      Next i
  Else
      MsgBox "Fandt ingen filer"
  End If
End With

End Sub
Avatar billede marten123 Nybegynder
30. november 2007 - 08:44 #16
Det du'r desværre ikke
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
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

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