Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1492to1496
1492to1496
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA: um eine Spalte weitergehen

Forumthread: VBA: um eine Spalte weitergehen

VBA: um eine Spalte weitergehen
24.05.2016 17:28:29
Honigdachs
Hallo Excel-Freunde,
ich habe folgenden Code und würde ihn gerne ein bisschen einfacher gestalten, falls Ihr mir helfen könnt:
Dim Zb As Long
Zb = Sheets("data").Cells(Rows.Count, 1).End(xlUp).Row
Range("C2:C" & Zb).FormulaLocal = "irgendeine Formel, in der der die Spalte C und Zb vorkommt"
Range("D2:D" & Zb).FormulaLocal = "irgendeine Formel, in der der die Spalte D und Zb vorkommt"
und so weiter ....
Wie kann ich das so vereinfachen, dass ich nicht bei jeder Spalte den Buchstaben neu schreibe?
Mit Offset?

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: VBA: um eine Spalte weitergehen
24.05.2016 17:54:10
Fennek
Hallo,
wenn es die selbe Formel ist, geht auch Range("C2:F & ZB).Formula =
Es geht auch .FormulaR1C1: dort werden relative Adressen übergeben und für jede Zelle angepasst.
Mit einer Beispieltabelle geht es auch etwas konkreter.
mfg

AW: VBA: um eine Spalte weitergehen
24.05.2016 18:07:55
Honigdachs
Danke für den Tipp Fennek!
Ich werde es morgen gleich testen.

Anzeige
AW: VBA: um eine Spalte weitergehen
24.05.2016 22:56:23
Luschi
Hallo Honigdachs,
hier mal mein Versuch: 

Sub MachMal()
Dim Zb As Long, k As Long, spB As String
With Sheets("data")
Zb = .Cells(.Rows.Count, 1).End(xlUp).Row
'1. Spalte 'C'
k = 3: spB = spBuchstabe(k)
.Range(spB & "2:" & spB & Zb).FormulaLocal = "irgendeine Formel, ..."
k = 4: spB = spBuchstabe(k)
.Range(spB & "2:" & spB & Zb).FormulaLocal = "irgendeine Formel, ..."
End With
End Sub
Function spBuchstabe(ByVal iNr As Integer) As String
'von Erich G.
spBuchstabe = Left(Cells(1, iNr).Address(0, 0), 1 - (iNr > 26) - (iNr > 702))
End Function
Gruß von Luschi
aus klein-Paris

Anzeige
AW: VBA: um eine Spalte weitergehen
25.05.2016 09:37:37
Honigdachs
Ich danke Euch beiden!
Beide Lösungen sind super.
Gruß,
Kürsat
;

Forumthreads zu verwandten Themen

In Spalte nach Anzahl eines Begriffs suchen?
Lauren

Hall Leute!
ich will nach einem Begriff, in meinem Fall nach "SUMs" in der Spalte C suchen und wissen wie oft es in der Spalte vorkommt.
Bei Berechnungen funktioniert es mit ZÄHLENWENN ohne Probleme aber wie erhalte ich die "absolute" Zahl?
Vielen Dank für Eure Hilfe!
Grüße
...
19.08.2008 11:08:23
Thread-ID: 1002846
5 Beiträge
von Datum bis Datum suchen und Werte in die Spalte
Datum

Hallo liebe Excel-Könner,
ich habe folgendes Problem und finde keine Lösung.
Ich habe in Spalte A von 2006 bis heute Datum stehen, über eine UserForm möche ich in zwei TextBoxen von bis Datum eintragen und in Spalte B in diesem Bereich den WertX.
Ich hoffe Ihr könnt mir helfen!
...
07.09.2008 09:31:20
Thread-ID: 1007931
8 Beiträge
Anzeige
@viele meinungen: spaltenangaben in vba
Herbert

hallo,
wie macht ihr denn das: wenn ich in einem vba-code spaltenangaben mache, und in der tabelle dann spalten einfügen oder entfernen muss, muss ich alle spaltenangaben im code manuell ändern. und wehe, ich vergesse das, dann stimmt das ganze makro nicht mehr.
beispiel:
With Sheet...
08.10.2008 19:41:00
Thread-ID: 1015156
6 Beiträge
VBA heutiges Datum finden und Inhalt der Zelle prü
NeptunesChild

Hallo Leutz,
ich möchte in einer Zeiterfassung auf einem Monatsblatt das heutige Datum finden, dann in einer anderen Spalte (5 weiter links) eine Uhrzeit eintragen. Zuvor soll aber die Kontrolle erfolgen, ob in der Zelle bereits etwas steht und ob dies kleiner ist, als die aktuelle Zeit. We...
06.11.2008 15:38:08
Thread-ID: 1022323
3 Beiträge
Ordner in Explorer-Struktur suchen VBA
andreas

Hallo zusammen,
habe ein Formular mit einem Button "Speichern" und unter anderem ein Feld "Angebotsnr."
Wird der Button Speichern gedrückt soll das Programm den Ordner der im Feld Angebotsnr. eingetragen ist suchen. Dieser Ordner ist zum Zeitpunkt der Erstellung des Formulares im Window...
11.11.2008 08:50:00
Thread-ID: 1023400
2 Beiträge
Anzeige
Werte in einer Spalte(5zeilig) suchen und löschen!
adrian

Hi,
kann mir jemand erklären warum das nicht funzt funktioniert?
liegt es daran, dass ich "SpalteR" als range deklariert habe, anstatt als string?
nur wie durchsuche ich dann den "string"?
Möchte nur folgendes:
Falls Werte in der Spalte (Bereich von nur 5 zeilen) sind, lösch...
24.11.2008 12:04:00
Thread-ID: 1027253
5 Beiträge
Anzeige
Wert in Spalte suchen
rebecca

Hallo,
ich möchte 2 Spalten vergleichen und wenn der Wert in einer Spalte steht, soll die Zelle ausgegeben werden.
Also: Spalte A 1,2,3 Spalte B 2,5,6 Dann Spalte C 2, alle anderen leer.
Welche Formel ist geeignet und wie muss ich sie aufbauen?
Dankeschön.
Gruss
...
24.11.2008 15:38:00
Thread-ID: 1027331
3 Beiträge
Spalten in VBA anpassen
Markus

Hallo zusammen,
eine vermutlich blöde Frage.
Ich lese aus einem Anwendungsfenster Daten in bestimmte Zellen aus. Wenn alle Daten (je nach Anwendung bis zu 30 Spalteneinträge) ausgelesen sind, erfasse ich die Zeit mit ActiveCell.Offset(0, 10).Value = Format(Date & " " & Time)
10.12.2008 20:45:20
Thread-ID: 1031825
9 Beiträge
Zahlen suchen in zwei spalten
Timo

Hallo,
ich habe ein kleines, wahrscheinlich sehr einfaches Problem.
Ich habe sowohl eine Spalte A als auch Spalte B, wo immer sechsstellige Zahlen drin stehen. Jetzt würde ich gern in Spalte C überprüfen lassen, ob die jeweilige Zahl, die in Spalte B steht, auch irgendwo in Spalte A v...
17.12.2008 08:51:00
Thread-ID: 1033514
4 Beiträge
Gleichzeitiges suchen zweier Werte in 2 Spalten
Kriam


Hallo.
Ich habe ein Problem in Excel (VBA) und komme nicht dahinter wie es zu lösen ist. Ich hoffe, das ihr mir hier weiterhelfen könnt.
Ich habe in Tabelle1, 2 Spalten mit Werte (In der A Spalte stehen Artikelnummern, in der B Spalte stehen die Lagerplätze der Artikelnummern)
...
02.02.2009 22:03:00
Thread-ID: 1046443
4 Beiträge
Anzeige
Wert in Spalte und entsprechender Zeile Finden
Klaus

Hi,
folgendes Problem:
Meine ExcelSpalten werden fortlaufend erweitert mit neuen Nummern.
Ich möchte jetzt eine Möglichkeit, in einer Zelle (usedrange +2) bei Eingabe einer neuen (existierenden)
Spaltenbezeichnung, automatisch den Zellenwert aus einer bestimmten Zeile haben. Da...
18.02.2009 15:51:00
Thread-ID: 1051850
3 Beiträge
Wert suchen, eintragen, weitersuchen (VBA)
Nico

Moin
Nachdem ich Gestern mein Problem mit einem Sverweis über mehrere Zellen lösen wollte (Danke nochmal an Josef Ehrensberger) habe ich heute feststellen dürfen, dass es zwar funktioniert - aber die Verzögerung auf Grund der Masse an Daten doch zu hoch ist.
Hier also mein Problem zieml...
26.02.2009 09:19:15
Thread-ID: 1054225
11 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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