Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1568to1572
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
1568to1572
1568to1572
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Variable Spalte in Range ansprechen

Variable Spalte in Range ansprechen
13.07.2017 10:12:16
Philipp
Hallo zusammen,
ich scheitere daran, den folgenden Code für eine variable Spalte zu nutzen. Aktuell ist alles auf Spalte "M" ausgelegt. Ich habe aktuell "Spalte" als String deklariert und mit der jeweils angeklickten Spalte belegt. Wie kann ich jetzt in den unten stehenden Code die Variable "Spalte" einbinden?
For Each rngfiltercell In Range("M15:M" & Range("M65536").End(xlUp).Row).SpecialCells(12)
If Range(rngfiltercell.Address).Value = "x" Then
Range(rngfiltercell.Address).Value = ""
Else
End if
Next
Danke und liebe Grüße,
Philipp

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

Betreff
Datum
Anwender
Anzeige
AW: Variable Spalte in Range ansprechen
13.07.2017 10:17:21
Hajo_Zi
For Each rngfiltercell In Range(Spalte & "15:" & Spalte & Range(Spalte &"65536").End(xlUp).Row).SpecialCells(12)

Ich gebe keinen Dank für eine Rückmeldung, da ich durch solche Beiträge nicht meine Beitragszahl erhöhen muss.
Rückmeldung ist ja in der Heutigen Zeit nicht üblich und die wenigen die eine Rückmeldung geben, mögen mir das verzeihen, das kein Danke für eine Rückmeldung kommt.
AW: Variable Spalte in Range ansprechen
13.07.2017 10:21:21
Beverly
Hi Philipp,
vielleicht so:
Dim intSpalte As Integer
Dim lngLetzte As Long
intSpalte = 14
lngLetzte = Columns(intSpalte).End(xlUp).Row
For Each rngfiltercell In Range(Cells(5, inspalte), Cells(lngLetzte, intSpalte)).SpecialCells( _
12)

Anzeige
AW: Variable Spalte in Range ansprechen
13.07.2017 10:36:53
Werner
Hallo Philipp,
Code wirkt sich in der Spalte aus, die vorher ausgewählt (angeklickt) wurde.
Public Sub Test()
Dim loSpalte As Long
Dim loLetzte As Long
Dim rngBereich As Range
Dim rngFiltercell As Range
With Worksheets("Tabelle1") 'Tabelle anpassen
loSpalte = Selection.Column
loLetzte = .Cells(.Rows.Count, loSpalte).End(xlUp).Row
Set rngBereich = .Range(.Cells(15, loSpalte), .Cells(loLetzte, loSpalte))
For Each rngFiltercell In rngBereich.SpecialCells(12)
If rngFiltercell.Value = "x" Then
rngFiltercell.ClearContents
End If
Next rngFiltercell
End With
Set rngBereich = Nothing
End Sub
Gruß Werner
Anzeige

69 Forumthreads zu ähnlichen Themen

VBA - if anweisung mit variable
Thomas

Hallo,
ich habe ein blöds Problem und zwar habe ich folgendes If Abfrage in einer Forschleife in Pseudo:
Wenn A1 kleiner als A2 tu dies sonst tu das
VBA:
For i = 2 To 5 If "A" & i
Irgendwie trifft dort immer nur Else ein, ich glaube es liegt an der Bedingungsformulier...
16.10.2008 10:10:50
Thread-ID: 1016763
4 Beiträge
Anzeige
Variablen Druckbereich mittels VBA einrichten
Space

Hallo Forum,
habe bisher nur ähnliche Probleme gefunden, die mir nicht weitergeholfen haben. Ich habe den folgenden Code in VBA eingegeben um über einen Button in Excel über den Standarddrucker das 2.te Tabellenblatt (Kontakte) zu drucken.
Mit einem festen Wert für den Druckbereich fun...
12.01.2010 16:26:29
Thread-ID: 1129194
2 Beiträge
Variablen Druckbereich mittels VBA einrichten (2) | Herbers Excel-Forum
Space
Hallo Rudi, Hallo Forums-Mitglieder,
zunächst vielen Dank an dich Rudi für die schnelle Rückmeldung! Leider konnte ich auf deinen Beitrag nicht direkt antworten, deshalb muss ich einen neuen Beitrag aufmachen.
Kurz zum Thema: Ich suche eine Lösung für einen variablen Druckbereich mittels VB...
13.01.2010 08:46:23
Thread-ID: 1129313
5 Beiträge
Anzeige
Teilergebnis per VBA mit variablen Spalten
grexx123

Hallo,
ich habe schon einmal in dieses Forum geschrieben und kann leider keine weiteren Beiträge mehr schreiben - meine Frage ist aber leider immer noch offen....
https://www.herber.de/forum/archiv/1156to1160/t1156986.htm
Ich möchte gerne eine Tabelle automatisch mit Teilergebnissen...
20.05.2010 16:15:43
Thread-ID: 1158102
3 Beiträge
VBA Namen definieren mit Variable
Philipp

Hallo,
ich bin seit Stunden dabei einen Dynamischen Datenbereich für eine Pivottabelle zu definieren und komm einfach nicht weiter. Meine bisherigen Lösungsansätze:
Sheets("PRO_Report_alle").Names.Add Name:="ReportBereich", RefersToR1C1:="PRO_Report_alle!" & "A1" & ":" & "...
11.06.2010 20:01:01
Thread-ID: 1161440
7 Beiträge
VBA: Problem mit Variable in Formel einfügen
Harald

Hallo,
diese VBA Zeile
Selection.FormulaArray = "=LARGE(IF(SUBTOTAL(2,INDIRECT(""Tabelle1!G""&ROW(R1:R9))),Tabelle1!R1C[5]:R9C[5]),ROW(R[-4]C[-1]))"
fügt diese Formel in Tabelle1 ein
=KGRÖSSTE(WENN(TEILERGEBNIS(2;INDIREKT("Tabelle1!G"&ZEILE($1:$9)));Tabelle1!G$1:G$9);ZEI...
29.07.2010 19:03:24
Thread-ID: 1169548
5 Beiträge
SUMPRODUCT in VBA - Wert mit Variable übergeben
Peter

Guten Tag
Ich habe nochmals eine Frage zu SUMPRODUCT in der VBA-Umgebung.
Nachstehender Code liefert mir das korrekte Ergebnis.
lngValue = [SUMPRODUCT((spxSum < 500000)*(spxAktiv="JA")*(spxFehler2<>"rot")*(len(spxText)<10))]
Nun möchte ich in der Formel nicht mehr ei...
18.10.2012 11:29:03
Thread-ID: 1282584
5 Beiträge
in vba excelmappe mit variablem datum öffnen
meixner

Hallo zusammen,
unteres Makro funktioniert nicht und ich kann es mir nicht erklären.
Sub Morgenroutine_oeffnen() Dim wb As Workbook Workbooks.Open Filename:=("I:\CM_88\8801\Fondsmanagement\Archiv Morgenroutine\Morgenroutine" & _ Format(Date, " YYYYMMDD")) End Sub Hat jmd. einen Ti...
19.10.2012 13:40:09
Thread-ID: 1282818
2 Beiträge
Anzeige

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
2
1
4
2
2
6
4
4
1
2
2
4
4
1
3
2
3
9
4
6
7
1
5
2