Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
440to444
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
440to444
440to444
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabelle um x spalten verschieben mit vba

Tabelle um x spalten verschieben mit vba
11.06.2004 11:38:18
der
Hallo!
Gibt es einen einfachen Befehl mit dem es möglich ist, eine Tabelle, die in Spalte A beginnt um (bspweise) 5 Spalten nach rechts zu verschieben damit die vorderen spalten leer sind für andere inhalte?
Danke für eine Antwort schon mal im Voraus!
Gruß&Dank
der alex

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabelle um x spalten verschieben mit vba
Jan
Hi Alex,
Dafür ist doch der Befehl "Ausschneiden" bzw. das Symbol mit der
Schere vorgesehen.
Du kannst aber auch entsprechende leere Spalten über
EINFÜGEN - SPALTEN einfügen.
Oder habe ich Dich falsch verstanden?!
Jan
AW: Tabelle um x spalten verschieben mit vba
Kl@us-M.
Hi Alex,
mal als Ansatz:
Option Explicit

Sub Spalten_einfuegen()
Dim i As Integer
i = InputBox("Wieviele Spalten sollen eingefügt werden")
For i = 1 To i
Columns("A:A").Insert Shift:=xlToRight
Next i
End Sub

Gruss aus dem Hunsrück
Klaus-Martin
AW: Tabelle um x spalten verschieben mit vba
Uduuh
Hallo,

Sub Spalten_einfügen()
Dim Anzahl As Byte, Start As String, Spalte As Byte
Anzahl = InputBox("Wieviele Spalte einfügen?")
Start = InputBox("Ab wo? (A,C,AG ...)")
If Anzahl > 1 And Start <> "" Then
Spalte = Columns(UCase(Start)).Column
Range(Columns(Spalte), Columns(Anzahl + Spalte - 1)).Insert shift:=xlToRight
End If
End Sub

Gruß aus'm Pott
Udo
http://www.excelerator.de
Anzeige

306 Forumthreads zu ähnlichen Themen

Zwei Spalten in jeweils zwei Tabellen miteinander
Lutz

Liebe Leute,
ich habe zwei recht umfangreiche Tabellen mit Lieferdaten und dies in zwei von einander unabhängigen Tabellen.
In der Tabelle1 stehen neben anderen die Spalten Bestellnr. und Materialnr. sowie Lieferantennr. In der Tabelle2 stehen wiederum die Spalten Bestellnr. und Materia...
08.08.2008 15:56:55
Thread-ID: 1000336
4 Beiträge
Anzeige
Pivot-Tab: Leere ausblenden?
Florian

Hallo liebes Forum,
hätte eine Frage zu Pivottabelle (VBA-Code!):
Gibt es einen Befehl, um die Summen der "leeren" Zellen auszublenden/nicht anzuzeigen? Benutzer soll nicht durc¨h unwichtige Daten überlastet werden (siehe Bsp gelbe Zellen).
Besten Dank, Florian
https://www.herb...
19.11.2008 14:45:00
Thread-ID: 1026052
6 Beiträge
Spalten aus einem Tabellenblatt auslesen
Kiewel

Hallo,
bin seit langem Nutzer des Forums und der CD, komme nun aber nicht mehr weiter. Villeicht kann mir ja einer von Euch Profis weiterhelfen.
Ich habe ein Tabellenblatt mit folgendem Aufbau:
Datum /Uhrzeit von/Uhrzeit bis/Team /Thema1/Thema2/Thema3
04...
05.01.2009 16:20:25
Thread-ID: 1037009
7 Beiträge
Anzeige
Pivot-Tabelle Datumsfilter in Spalte
MBorn

Hallo,
in meiner Pivot-Tabelle gibt es in Spalte A Datumswerte.
Weiß jemand, wie es gelingt, Datumswerte von/bis (zwischen zwei Grenzdaten) zu filtern?
Soweit ich sehe bietet der Filter nur eine Variation, entweder größer als oder
kleiner als....
Noch schöner wäre es wenn ic...
08.05.2009 16:57:27
Thread-ID: 1073949
2 Beiträge
Leere zeilen ausblenden
Andreas

Hallo Forum,
mit folgendem Code lasse ich Zeile auf Inhalt prüfen und ggf. ausblenden:
Private Sub Worksheet_Activate() Dim rng As Range For Each rng In Range("A30:A47") rng.EntireRow.Hidden = rng.Value = "" Next End Sub
Bei diesem Vorgang flackert aber das Dokument einige Sekund...
03.07.2009 14:06:44
Thread-ID: 1086237
6 Beiträge
Spalten in neues Tabellenblatt kopieren
Doreen

Ich arbeite seit langem mal wieder mit Excel und hab alles vergessen :-(
Ich habe ein Tabellenblatt in dem ich alle meine Informationen pflege. Einfach verschiedene Daten (z.B. Liefertage, Lieferdateinname, Land, etc.) in Spalten runter geschrieben, ohne Bezüge - nichts, einfach nur ne Lis...
22.07.2009 11:53:21
Thread-ID: 1090482
2 Beiträge
Makro für Kopiern eine Spalte links davon einfügen
einfügen

Hallo,
ich bin auf der Suche nach einer Lösung für folgendes Problem.
Ich möchte die Werte die ich markiert habe (die Markierung ist jedes mal anders) kopieren und eine Spalte links davon als "Werte und Zahlenformate" einfügen. Die Markierung besteht vor Ausführung des Makros. Wie bring...
28.07.2009 15:51:06
Thread-ID: 1091972
5 Beiträge
Pivottabelle Spalten berechnen
karsten

Hallo Zusammen,
ich habe folg.Frage.:
Ich habe eine Tabelle mit 2 Spalten.
1.Spalte: DATUM
2.Spalte: CODE
DATUM CODE
01.01.2009 A
08.02.2009 M
23.02.2009 C
09.08.2009 F
Wie kann ich in einer Pivottabelle die Datumsangaben bereits in Monaten eingeteilt dar...
23.09.2009 11:15:14
Thread-ID: 1104846
10 Beiträge
Anzeige

Links zu Excel-Dialogen

InputBox

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
8
5
6
2
1
5
1
4
9
4
2
8
7
8
5
6
2
6
4
2
7
4
2
5