Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1796to1800
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
VBA Bereich kopieren neue Tabelle
11.12.2020 06:41:00
Rene
Hallo,
hätte Eure Hilfe benötigt. Habe einen Code mit dem ich einen Bereich in der Tabelle Istkosten in das Blatt Istko kopiere. Gesteuert habe ich das über eine Textbox. Gebe ich 1 ein soll er den Bereich in Istko kopieren. Gebe ich 2 ein soll er den Bereich in Istko unter Periode 2 kopieren. Irgendwie bekomme ich das nicht hin. Kann mir bitte wer helfen.
Private Sub CommandButton1_Click()
If TextBox1 

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Variable benutzen ...
11.12.2020 06:58:30
Matthias
Hi
z.B. so:
Private Sub CommandButton1_Click()
Dim ColPlus
Application.ScreenUpdating = False
On Error GoTo Fehler
If CLng(TextBox1) = 1 Then ColPlus = 9
If CLng(TextBox1) = 2 Then ColPlus = 10
Range("B8:C45").Copy
Sheets("Istko").Cells(15, Int(TextBox1.Value + ColPlus)).PasteSpecial Paste:=xlValues     '  _
Werte
Application.CutCopyMode = False
Application.ScreenUpdating = True
Exit Sub
Fehler:
MsgBox "Fehler"
End Sub
Gruß Matthias
Anzeige
AW: Variable benutzen ...
11.12.2020 08:25:39
Rene
Echt lässig. Danke für deine Hilfe. :)
und Zielbereich vorher leeren! owT
11.12.2020 07:00:58
Matthias

309 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige