Åbning af regneark med specifik makro

Nu ved jeg ikke hvordan du har tænkt dig det... men her et et eks.

I Ark1 er
A1 = C:\Dokumenter\
B1 = Regneark.xls


Public Sub OpenFile1()
    Dim sFileName As String
   
    sFileName = Worksheets("Ark1").Range("A1").Value
    If Not (Right(sFileName, 1) = Application.PathSeparator) Then
        sFileName = sFileName & Application.PathSeparator
    End If
    sFileName = sFileName & Worksheets("Ark1").Range("B1").Value
   
    Application.Workbooks.Open sFileName
End Sub


Hvis du har navnet direkte i makro'en

Public Sub OpenFile2()
    Application.Workbooks.Open "C:\Dokumenter\Regneark.xls"
End Sub

En lille tilføjelse, så makro'en ikke fejler, hvis filen ikke findes.....


Public Sub OpenFile1()
    Dim sFileName As String
   
    sFileName = Worksheets("Ark1").Range("A1").Value
    If Not (Right(sFileName, 1) = Application.PathSeparator) Then
        sFileName = sFileName & Application.PathSeparator
    End If
    sFileName = sFileName & Worksheets("Ark1").Range("B1").Value
   
    If Not (Dir(sFileName, vbNormal) = "") Then
        Application.Workbooks.Open sFileName
    End If
End Sub


Public Sub OpenFile2()
    Const sFileName As String = "C:\Dokumenter\Regneark.xls"
    If Not (Dir(sFileName, vbNormal) = "") Then
        Application.Workbooks.Open sFileName
    End If
End Sub

Hej Flemming,
Det jeg eftersøger er egentlig ikke vba kode i en makro, men helt konkret om man fra sin taskbar kan åbne et regneark med et specifikt makro-navn som parameter.
d.v.s. at man blot trykker på linket i sin taskbar, som så åbner regnearket med den angivne makro.
Luciano

NÅhh okay...... Taskbaren viser de programmer du benytter, så nok ikke der, men du kan ligge en genvej til filen ind i din Quick Launch Toolbar, som ligger på taskbaren (hvis du har Quick Launch toolbaren vist)

Jeg prøver at være helt konkret,

Jeg har lavet nogle links på vores intrapost som alle peger ned på det samme regneark. MEN de forskellige links skulle gerne åbne regnearket med forskellige makroer.
F.eks. linket: Folder/underfolder/Regneark;"MakroA".xls åbner Regneark.xls og afspiller "MakroA".(Det jeg savner er den korrekte parameter-syntaks i linkangivelsen)
Jeg mener at jeg engang har gjort det med Word (eller Access), men ved ikke om det er muligt i Excell.

Godt så - Nu tror jeg, at jeg er helt med...!!

Du vil altså gerne åbne en excel fil med opstart af forskellige makroer afhængigt af de parametre du sender med....

Det kan jeg ikke svare på. Mest af alt tror jeg svaret er Nej....

Helt korrekt forstået & defineret !
Tak for din indsats, jeg er ny på listen og regner med at jeg skal trykke på "Afvis" for at sp. skal blive hængende.

En rar dag til dig !

Luciano

Thanks og en forrygende dag til dig :-)

Det er ikke muligt at aktivere en specifik Excel makro baseret på en kommando-linie parameter.

Det tætteste du kan komme er at have flere regneark med hver deres WorkBook_Open
event makro.

Jeg er ikke sikker på mit nej.
Synes jeg har set noget, og måske man kan komme til at skrive et tal i f.eks. A1 og så have en Change event på den celle, men jeg har ikke kunnet findet det endnu.

Kan du have set det her ?
http://j-walk.com/ss/excel/eee/eee002.txt

et eksempel fra Laurent Longre....

Jeg kan ikke umiddelbart få det til at virke.