Thema Datum  Von Nutzer Rating
Antwort
28.06.2022 16:30:01 Gast29220
NotSolved
Blau VBA Quelltext mit Zählerschleife dublizieren
 28.06.2022 18:22:27 volti
NotSolved

Ansicht des Beitrags:
Von:
volti		 Datum:
28.06.2022 18:22:27		 Views:
748		 Rating:
     
Antwort:
  Ja
Thema:
VBA Quelltext mit Zählerschleife dublizieren

Hallo,

ich habe Dein Anliegen nicht verstanden, deshalb hier nur zwei Anmerkungen.

Wenn Du ein Worksheet in einer Variablen speicherst und hierauf nur einmalig in einer WITH-Anwendung zugreiftst, kannst Du Dir das sparen.

Das ..Click suggeriert mir, dass Du 48 Button zum Klicken hast. Wenn Du Formularbuttons einsetzen solltest, kannst Du auch alle auf eine Sub zuordnen und in dieser einen Sub mit Application.Caller den Buttentext auswerten. 

Hier ein Beispiel:

Code:
01
02
03
04
05
06
07
08
09
10		  
Sub MeineSchaltflächenabfrage()
  With ThisWorkbook.Sheets("coach")
      .Range("d63").Value = 1
      .Rows("65").EntireRow.Hidden = True

      MsgBox "Ich wurde von " & Application.Caller & " aufgerufen!"
      ' ... und noch einges mehr an Quelltext
  End With

End Sub
_________
viele Grüße
Karl-Heinz

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
28.06.2022 16:30:01 Gast29220
NotSolved
Blau VBA Quelltext mit Zählerschleife dublizieren
 28.06.2022 18:22:27 volti
NotSolved