tekst van CommandButton uit lijst halen.

[schuurar]

Beste forum.

Is het mogelijk om een serie CommandButtons de tekst te geven uit een kolom met namen?
Dus als je een tekst in een cel veranderd dat de naam van de CommandButton mee veranderd.

bv op blad1 heb ik 5 CommandButtons staan
in blad2 heb ik in A1 tot A5 namen staan. De tekst van de CommandButtons moeten dan de namen worden van blad2 A1 tot A5

Is dat te doen met een vba code ofzo?

Weet iemand hier een oplossig voor?
Hoor het graag.
Bekijk bijlage CommandButton tekst geven.xlsx

Bedankt vast.

 

[Cobbe]

Zo iets kan je daar mee helpen.

 

[schuurar]

He Codde dit werkt al super!!
Nu heb ik nog een vraagje
Stel dat ik nu 1 naam minder heb soms kan je dan die knop dan ook tijdelijk onzichtbaar maken??

 

[edmoor]

Bij deze een aanvulling op de code van Cobbe. Die was me overigens net voor

Bekijk bijlage CommandButton tekst geven.xlsm

 

[schuurar]

Edmoor Super bedankt voor de aanvulling!
Hier kan ik mee verder!!!

Allebei hartelijk dank !!!

 

[snb]

Private Sub Worksheet_Change(ByVal Target As Range)
   If Target.Column = 1 Then
     sn = Cells(1).Resize(Blad1.OLEObjects.Count)
     For j = 1 To ubound(sn)
       With Blad1.OLEObjects("Commandbutton" & j)
          .Object.Caption = sn(j, 1)
          .Visible = sn(j,1) <> ""
        End With
    Next
  End If
End Sub

 

[edmoor]

Keurig! :thumb:

 

[snb]

Het oog van de meester maakt het paard vet...

 

[schuurar]

snb ik krijg die van jou niet werkend
Wat doe ik verkeerd? Heb hem in blad2 geplakt
dit verhaal kan ik trouwens niet "lezen" snap de opbouw ervan niet.
Die code van Cobbe & edmoor kan ik redelijk volgen.

Heb je er een uitleg bij ??

 

[snb]

Zoek met behulp van de hulpbestanden van de VBEditor iedere onbekende term op en lees wat ze betekenen.

 

[schuurar]

Bekijk bijlage __knoptekst snb.xlsm

Nu heb ik weer een bijkomende vraag
Is het ook mogelijk om met de zelfde knoppen gegevens te laten zien uit verschillende tabbladen? (zie voorbeeld)

Dan heb ik voor het ene blad wel meer buttons nodig als voor een ander.
De buttons moeten dan onzichtbaar worden als ze niet nodig zijn.