Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

CommandButton per Mausklick benennen

Frage Microsoft Microsoft Office

Mitglied: Exzel

Exzel (Level 2) - Jetzt verbinden

06.07.2008, aktualisiert 15.07.2008, 4798 Aufrufe, 2 Kommentare

Hallo zusammen,

hab' mehrere CommandButtons durchzunummerieren (über 200) und wollte deshalb wissen, ob es möglich ist per Mausklick die Commandbuttons zu benennen.

Es sollen die Eigenschaften Name und Caption verändert werden. Und zwar in aufsteigender Reihenfolge nummeriert. Die Namen gestalten sich so Platz_1, Platz_2, Platz_3... und die Captions 1,2,3...

Geht das per VBA-Script?

Gruß
Mitglied: misterdemeanor
06.07.2008 um 22:44 Uhr
Hallo Exzel.

Du schreibst von CommandButtons. Demzufolge arbeitest Du mit UserForms...richtig?

In einem Deiner anderen Posts zu Deiner Platzverwaltung sieht es aber eher aus das Du diese komischen XLFormButtons verwendest. (Beziehe mich hier auf Den Thread mit dem sinnigen Namen Es ist zum Verzweifeln...

Wenn dem wirklich so ist könnte der einfachste Weg über VBA in etwa so aussehen:

01.
Public Function SetTheButtonsUp() 
02.
  Dim wb As Workbook 
03.
  Dim ws As Worksheet 
04.
  Dim s As Shape 
05.
  Dim i As Integer 
06.
      'Hier entsprechend anpassen 
07.
    Set wb = ActiveWorkbook 
08.
    Set ws = ActiveWorkbook.Sheets("Tabelle1") 
09.
    i = 1 
10.
      'Alle Elemente im Sheet durchlaufen... 
11.
    For Each s In ws.Shapes 
12.
        '...und schauen ob es sich um ein "xlButtonControl" handelt 
13.
      If s.FormControlType = xlButtonControl Then 
14.
        'so und hier könnte es kniffelig werden. Hier mal der einfachste Weg. 
15.
        s.Name = "Platz_" & i 
16.
        s.TextFrame.Characters.Text = i 
17.
          'GGfls. noch zu einem eigenen Click-Handler verweisen 
18.
        's.OnAction = "Platz_' & i ' & '_OnClick'" 
19.
        i = i + 1 
20.
      End If 
21.
    Next 
22.
    Set ws = Nothing 
23.
    Set wb = Nothing 
24.
End Function
Naja, etwas primitiv...
aber könnte ja ein erster Ansatz für Dich sein.

BG, Felix -misterdemeanor-
Bitte warten ..
Mitglied: Exzel
15.07.2008 um 16:02 Uhr
Vielen Dank!

Muss den Code mal studieren


Gruß
Bitte warten ..
Ähnliche Inhalte
Visual Studio
gelöst Alternative zum Mausklick (6)

Frage von BoomBoomBen zum Thema Visual Studio ...

Microsoft
Ordner mit LW-Buchstaben versehen und benennen (21)

Frage von Xaero1982 zum Thema Microsoft ...

Batch & Shell
gelöst Mit Batch Datei nach Ordner benennen indem sie sich befindet? (4)

Frage von PinkFLuffyUnicorn zum Thema Batch & Shell ...

Batch & Shell
gelöst Powershell oder Batch-Task: Kopiere Datei x mal und benenne diese um (2)

Frage von Lorderich zum Thema Batch & Shell ...

Neue Wissensbeiträge
Mac OS X

Apple hat macOS High Sierra veröffentlicht

(4)

Information von Frank zum Thema Mac OS X ...

Viren und Trojaner

Ransomware or Wiper? RedBoot Encrypts Files but also Modifies Partition Table

(4)

Information von BassFishFox zum Thema Viren und Trojaner ...

Notebook & Zubehör

WOL bei HP Notebooks

(8)

Erfahrungsbericht von Henere zum Thema Notebook & Zubehör ...

Heiß diskutierte Inhalte
Windows Server
Seit IP Umstellung DC DNS Fehler (29)

Frage von Yaimael zum Thema Windows Server ...

Windows 10
gelöst Netzwerkkarte schaltet sich erst nach dem Logon ein (24)

Frage von DerWoWusste zum Thema Windows 10 ...

Grafik
gelöst CAD Arbeitsplätze (17)

Frage von Diddi93 zum Thema Grafik ...

Weiterbildung
gelöst Fest angestellter Admin oder Systemhaus Admin mit Kundenbetreuung? (16)

Frage von Voiper zum Thema Weiterbildung ...