Sub TABELLE2_EIN()
Sheets("Tabelle2").Visible = True
End Sub
Sub TABELLE2_AUS()
Sheets("Tabelle2").Visible = False
End Sub
Sub INHALT_WERTE()
Selection.Copy
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Application.CutCopyMode = False
End SubSub TABELLE2_EIN_AUS()
If Sheets("Tabelle2").Visible = True Then
Sheets("Tabelle2").Visible = False
Else
Sheets("Tabelle2").Visible = True
End If
End Sub
C++ & COM-Port
Pyro_oC 16.01.2007 - 133 Hits -
Internet Explorer 6.0
flippo 19.07.2007 - 31 Hits -
AVG Free - Fehler bei der Installation
Besucherpete 07.03.2008 - 38 Hits -
Möchte e-Mail-Adresse einer anderen zuordnen - geht das?
Redirector 06.04.2008 - 26 Hits - 6 Antworten