Marco gebruiken in meerde sheets?

[HBot]

Geachte,

Ik heb onderstaande macro gebouwd?
Kan ik *vet gedrukte regel* wijzigen zodat ik deze op meerdere vergelijkbare sheets kan gebruiken waarvan de naam wijzigd?
Ik kan hem nu alleen gebruiken in de sheet "'PPAS F08v3 SAP.XLS'"

Sub Close_PPAS()
'
' Close_PPAS Macro
' Macro recorded 30-1-2009 by botterh
'

'
ActiveSheet.Outline.ShowLevels RowLevels:=1
ActiveWindow.SmallScroll Down:=-48
Columns("O:S").Select
Selection.EntireColumn.Hidden = True
ActiveWindow.LargeScroll ToRight:=-1
ActiveWindow.View = xlPageBreakPreview
*Application.Run "'PPAS F08v3 SAP.XLS'!ShowPass"*
End Sub

Groet Botje

 

[Demeter]

haal de .xls eens uit je regel.

"'PPAS F08v3 SAP'!ShowPass"*

PPAS F08v3 SAP moet wel open staan.

Wat doet ie nu?

 

[HBot]

Volgende foutmelding
run-time error '1004'
the marco "PPAS F08v3 SAP'! showpass' cannot be found.

Ik wil ook dat de naam "PPAS F08v3 SAP" kan varieeren omdat de sheets de naam van het betreffende product meekrijgen.

De marco is ook bedoeld om bepaald kollomen of rijen te verbergen en hierna gelijk de optie geeft om desbetreffende file te beschermen(open "showpass") zodat je een paswoord kan invoeren.

Botje

 

[Demeter]

heb je misschien een vb file met fictieve data?

 

[Warme bakkertje]

Waarom de macro niet in je persoonlijke werkmap steken zodat je hem over meerdere bestanden kan gebruiken ?

Mvg

Rudi

 

[HBot]

Bakkertje,

Hij staat in mijn persoonlijke werkmap.
Ook de marco "showpass" staat in mijn personlijke werkmap,

Ik heb geprobeerd in de marco de marco"showpass" te starten, maar dit werk ook niet?
Application.Run '!ShowPass

Tot aan deze regel gaat het goed!!

Botje

 

[Warme bakkertje]

Botje, als beiden in dezelfde map staan zou een Call

Call ShowPass

moeten volstaan. anderzijds kan je ook onderstaande proberen

Application.Run ("Naamvanjepersoonlijkewerkmap!ShowPass")

Mvg

Rudi

 

[HBot]

Bakkertje,

Bedankt 't werkt.

Weer wat geleerd.

Goed weekend.

Botje