ich muss ein VBE-DropDown Menue bauen, wo man den Monatswechsel auswaehlen kann. Die Liste mit Monaten habe ich gerade noch zusammen gebastelt, mit meinen sperlichen Wissen ueber VBE.
---------------
Sub CreateCommandBarWithControls()
' Purpose: Creates a sample command bar with a number
' of controls.
Dim objCommandBarComboBox As Office.CommandBarComboBox
For Each objCommandBar In Application.CommandBars
If objCommandBar.Name = "Month Change" Then
objCommandBar.Delete
End If
Next objCommandBar
Set objCommandBar = Application.CommandBars.Add _
("Month Change")
With objCommandBar.Controls
Set objCommandBarComboBox = .Add(msoControlComboBox)
With objCommandBarComboBox
.AddItem "January"
.AddItem "February"
.AddItem "March"
.AddItem "April"
.AddItem "June"
.AddItem "July"
.AddItem "August"
.AddItem "September"
.AddItem "October"
.AddItem "November"
.AddItem "December"
.Text = "Month"
.Caption = "Color"
.Style = msoComboNormal
.TooltipText = "Select or type your favorite color."
End With
End With
objCommandBar.Visible = True
End Sub
----------------
Was ich nicht hinbekommen habe ist:
Wenn ich Februar ausgewaehlt habe, sollen alle Formelinhalte in einem Range die P200201 beinhalten durch P200202 erstezt werden. Damit moechte ich sozusagen den Monatswechsel bewirken.
Danke fuer eure Hilfe
Guegen