Avatar billede aviation Nybegynder
09. august 2007 - 10:08

Flerbruger af excel filer på server

Jeg har et system bestående af 5 excel workbooks og et word doc alt ligger i samme biblotek. den ene excel fil er en masterside hvor der indtastes nogle personoplysninger som så bliver overført til den workbook som åbnes med funktionsknap. I dag har hver bruger sit eget system men det gør vedligeholdelse besværlig. Jeg ønsker at ligge det på serveren evt som skabelon så de findes kun et sted og så alle kan anvende dem samtidigt. men når jeg gør det fungerer funktionerne mellem de forskellige workbooks ikke. Jeg ved godt at referencen i mit program ikke er rigtig når de bliver lagt ud og åbnet som skabelon men hvad skal jeg ændre koden til. der er vedhæftet et eksempel.

Private Sub Balloon_Click()
    Dim wb As Workbook
    Dim wbOpen As Boolean
    Dim wbFilename As String
   
    wbOpen = False
    wbFilename = "BA147NAI.xls"
   
    For Each wb In Application.Workbooks
        If wb.Name = wbFilename Then
            wbOpen = True
            wb.Activate
        End If
    Next
        If wbOpen = False Then
    Workbooks.Open Filename:=ThisWorkbook.Path & "\BA147NAI.xls", ReadOnly:=True
    Application.Windows.Arrange xlArrangeStyleCascade
    End If
   
End Sub

jeg håber der er nogle som kan hjælpe.
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
Kurser inden for grundlæggende programmering

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