Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
132to136
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
132to136
132to136
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

übergabeEinerVariablenAnRange

übergabeEinerVariablenAnRange
05.07.2002 12:32:40
Stefan Preisler
also ich bin schonmal soweit das ich dieses script mit Hilfe der Makro-Aufzeichnung und hilfe erstellt habe...
ich muss jetzt nur noch erreichen das der wert zellenzahl an das "range" übergeben wird. oder muss ich einen anderen befehl als "range" verwenden?

"Sub test()
'
' test Makro
'
zellenzahl = InputBox("geben sie die Zeilenanzahl ein: ", zellenzahl)
'
ActiveSheet.Unprotect
Worksheets("spares for switching").Range("zellenzahl").Select
Selection.EntireRow.Insert
ActiveWindow.SmallScroll ToRight:=2
Range("H15").Select
Selection.AutoFill Destination:=Range("H11:H15"), Type:=xlFillDefault
Range("H11:H15").Select
Range("F15").Select
Selection.AutoFill Destination:=Range("F11:F15"), Type:=xlFillDefault
Range("F11:F15").Select
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub"


1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
  • 05.07.2002 13:08:11
    @lex
Anzeige
?
05.07.2002 13:08:11
@lex
Hallo !
Schau Dir meine Antwort von vorhin an, bevor Du einen neuen Thread ohne Bezug zum Original aufmachst.

Nix für ungut,
Alex

Anzeige

301 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige