Public Sub test()
'Dim Dateiname ' variable die sich auf die zeilennummer bezieht in der der pfad steht
Dim sh
Dim Pfad
Pfad = ActiveCell.Text 'oder Pfad = Cells(Dateiname, 20).Text
Set sh = CreateObject("Shell.Application")
sh.Open Pfad
End Sub
es geht hier um folgendes. ich hab eine lange liste in excel zu der es in einer anderen anwendung jeweils eine bestimmte datei gibt. nun möchte ich in jeder zeile eine schaltfläche setzten,die die richtige datei öffnet. in einer zelle der zeile habe ich eine verkettung die den dateinamen bildet. meine frage:
was kann ich tun damit ich nicht jeder schaltfläche ein makro zuordnen muss, sondern die schaltfläche, zum beispiel die zeilennummer an das makro schickt damit man sie in der cells-anweisung verwenden kann? zb. kann man auf den text den man auf die schaltfläche schrieben kann im makro zurückgreifen? und desweitern würde ich gerne mit der sendkeys-anweisung etwas mit zur anwendung schicken, nämlich viermal die bildlinks-taste. hab ich auch nicht hingekriegt.
wenn mir jemand helfen könnte wäre das nett. viele grüße boris, danke im vorraus :-)