Thema Datum  Von Nutzer Rating
Antwort
07.10.2008 09:02:42 Luise
NotSolved
07.10.2008 15:47:51 Olaf
NotSolved
08.10.2008 08:21:36 Luise
NotSolved
Blau Aw:Aw:VBA-Commandbutton erzeugen
08.10.2008 10:13:49 Olaf
NotSolved
08.10.2008 15:02:46 Luise
NotSolved
08.10.2008 15:05:51 Luise
NotSolved
09.10.2008 08:45:51 Olaf
NotSolved

Ansicht des Beitrags:
Von:
Olaf
Datum:
08.10.2008 10:13:49
Views:
1113
Rating: Antwort:
  Ja
Thema:
Aw:Aw:VBA-Commandbutton erzeugen
Hallo Luise,
damit erstellst du mit VBA den Button in dem Aktiven Sheet.

ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1", Link:=False _
, DisplayAsIcon:=False, Left:=100, Top:=50, Width:=90, Height:= _
30).Select

du kannst aber auch denn Button vorher (per Hand) erstellen und unsichbar machen und ihn dann wieder sichtbar machen wenn du ihn brauchst. Dann musst du ihne nicht immer beschriften.

das würde dann so aussehen

ActiveSheet.Shapes("CommandButton1").Visible = False/true

hiermit Zählt er dann die gefüllten Zellen.

Sub Anzahl_gefuehlter_Zellen()

Dim c As Range
Dim i As Long

i = 0
'
For Each c In ActiveSheet.UsedRange
If Not c.Value2 = "" Then i = i + 1
Next
MsgBox ("In " & i & " Zellen sind Werte eingetragen")
End Sub

Wenn noch Fragen offfen sind melde dich.

Gruß
Olaf

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
07.10.2008 09:02:42 Luise
NotSolved
07.10.2008 15:47:51 Olaf
NotSolved
08.10.2008 08:21:36 Luise
NotSolved
Blau Aw:Aw:VBA-Commandbutton erzeugen
08.10.2008 10:13:49 Olaf
NotSolved
08.10.2008 15:02:46 Luise
NotSolved
08.10.2008 15:05:51 Luise
NotSolved
09.10.2008 08:45:51 Olaf
NotSolved