Knoppen bij renamemap opnieuw toewijzen

[PJurriaans Sr]

Hallo allemaal,
Ben uitermate verguld met de hulp die wij onwetende van dit forum mogen ontvangen daar voor bij deze mijn hartelijke dank.:thumb::thumb:Ik hoop ooit nog eens de kennis te ont-
wikkelen dat ik zelf met oplossingen kan komen.

Nu mijn probleem,Ik heb 16 knoppen aan mijn programma's gekoppeld,bij iedere rename
moet ik ze weer toewijzen? Is daar eventueel een andere oplossing voor dat zou ik zeer
op prijs stellen.bvd.

 

[Wigi]

Geef eens een klein voorbeeldbestandje met bvb. een 3 tal knoppen in.

En tevens wat het resultaat zou moeten zijn.

 

[PJurriaans Sr]

Knoppen bij rename map opnieuw toewijzen

Ja Wigi dat is mijn fout,Ik zal proberen het te verduidelijken.
1 Open een bestand met de naam "leeg"
2 Maak een Macro met de naam Sub "Huur()"
3 Maak een knop en wijs die aan die Macro toe.
4 En druk op die knop,hij werkt prima.
5 Ik geef het bestand "leeg" de naam "Vol"
6 Druk op de knop en krijg een bericht dat het bestand "leeg" niet kan worden gevonden.
7 Wijs vervolgens de knop aan "Vol" toe en wat zeur ik hij doet het weer!!
8 Maar om dat iedere keer met 16 knoppen te doen vind ik vervelend.

Wigi ik hoop dat daar een andere oplossing voor is,misschien dat de module ook de
naam "Vol" krijgt??,maar hoe???
Hoop van je te horen Groet Peter.

 

[Wigi]

Welke code gebruik je dan in de macro?

Daar zal de bestandsnaam in staan, vermoed ik. En daarop hapert het.

 

[PJurriaans Sr]

Knoppen bij rename map opnieuw toewijzen

Wigi daar zijn we weer.Deze macro is gemaakt in Excel VBA.Bestand "leeg"stond open.
Toen heb ik daar een knop in de werkbalk voor gemaakt en aan "Huur" gekoppeld.
Zolang ik in het bestand "leeg" was,werkte dit prima maar ik gaf het bestand" leeg" een
andere naam en toen kon de knop de macro" Huur " niet meer vinden.hopende dat ik
nu goe gevormuleerd heb verblijf in met vriendelijke Groeten Peter.
Bij deze de macro.

Sub Huur()
'
' Huur Macro
' Deze macro is gemaakt terwijl map "leeg"geopend is

Rows("1:1").Select
ActiveWindow.Zoom = 65
Columns("B:B").ColumnWidth = 17.71
With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
Cells.Select
Selection.RowHeight = 14
Range("A1").Select
ActiveCell.FormulaR1C1 = "datum"
Range("B1").Select
ActiveCell.FormulaR1C1 = "omschrijving"
Range("D1").Select
ActiveCell.FormulaR1C1 = "huur"
Range("D2").Select
End Sub

 

[Wigi]

En staat die macro wel degelijk in het bestand zelf? Niet in de persoonlijke werkmap?

 

[PJurriaans Sr]

Knoppen bij renamemap opnieuw toewijzen

Wigi Door je laatste vraag ben ik ik er uit !! :thumb:de Macro's,Procedures moeten inderdaad in de Persoonlijke Macrowerkmap staan, de map VBAProiect(Persnlk.xls,
wordt geopend als Excel wordt gestart en dan zijn de Macro's,Procedures in ieder
bestand te gebruiken.
Nogmaals dank voor het meedenken Groet Peter.