Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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, 4784 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
Microsoft
Ordner mit LW-Buchstaben versehen und benennen (21)

Frage von Xaero1982 zum Thema Microsoft ...

Visual Studio
gelöst Alternative zum Mausklick (6)

Frage von BoomBoomBen zum Thema Visual Studio ...

Batch & Shell
gelöst Von Batchdatei ausgeführten Prozess benennen (12)

Frage von itazubii zum Thema Batch & Shell ...

Neue Wissensbeiträge
Google Android

Cyanogenmod alternative Downloadquelle

(5)

Tipp von Lochkartenstanzer zum Thema Google Android ...

Batch & Shell

Batch als Dienst bei Systemstart ohne Anmeldung ausführen

(5)

Tipp von tralveller zum Thema Batch & Shell ...

Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

(1)

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Heiß diskutierte Inhalte
Server
gelöst Wie erkennen, dass nur deutsche IPs Zugang zu einer Website haben? (22)

Frage von Coreknabe zum Thema Server ...

Hardware
16-20 Port POE Switch mit VLAN (19)

Frage von thomasreischer zum Thema Hardware ...

Windows Server
gelöst Exchange HyperV Prozessorlast (19)

Frage von theoberlin zum Thema Windows Server ...

Windows Userverwaltung
Nicht Administratoren Installation von Software erlauben (14)

Frage von WinLiCLI zum Thema Windows Userverwaltung ...