Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 08:56:18
Textbox in Tabellenblatt ohne Bestätigung in Zelle eintragen
20.04.2024 07:57:54
Tablle fürs E-Auto - Preis wenn kürzer als 60 Min Ladezeit
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1008to1012
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
1008to1012
1008to1012
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bereich auswählen auf Basis der Spaltennummern

Bereich auswählen auf Basis der Spaltennummern
10.09.2008 18:06:00
Eberhard
Hallo zusammen :-)
Vielleicht kann mir jemand helfen.
Ein Anwender soll in einer Tabelle einen Eintrag auswählen, in dem er in irgendeiner Zeile der Tabelle eine Zelle auswählt.
Das Makro soll dann spaltenorientiert Zellen aus dieser Zeile markieren, aber zum Beispiel nur die Spalten 3 bis 5.
Beispiel:
Die angewählte Zelle ist: B12
Das Makro soll darauf hin markieren: C12 bis E12
Diese Auswahl wird dann weiter verarbeitet.
Weiss jemand Rat?
Vielen Dank im Voraus!
Liebe Grüße
Eberhard König

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bereich auswählen auf Basis der Spaltennummern
10.09.2008 18:19:00
Andi
Hi,
zB so:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("C" & Target.Row & ":E" & Target.Row).Select
End Sub


Die Weiterverarbeitung wäre aber mit an Sicherheit grenzender Wahrscheinlichkeit auch zu bewerkstelligen, ohne den Bereich vorher zu markieren, und zwar schneller und übersichtlicher.
Schönen Gruß,
Andi

AW: Bereich auswählen auf Basis der Spaltennummern
10.09.2008 18:19:22
Hajo_Zi
Hallo Eberhard,
Excel ist ein vielseitiges Programm und man kann viele Probleme damit lösen. Jede positive Seite hat aber auch negative Aspekte - einer davon ist im Makrorecorder enthalten.
Die Bücher, die es zu Excel VBA gibt, erklären viele Funktionen, aber ich habe bisher nur in einem gelesen, dass der vom Makrorecorder aufgezeichnete Code bereinigt werden sollte.
Der Makrorecorder zeichnet alle Aktionen auf, u. a. auch das Auswählen einer Zelle oder eines eingebetteten Objektes (Bild, Diagramm, Zeichnungsobjekt usw.) dabei wird generell Select und Activate aufgezeichnet. Diese Befehle sind in VBA zu 99,9% nicht notwendig. Sie lassen den Bildschirm flackern und senken die Geschwindigkeit bei der Ausführung des Codes. Man sollte also schon von Beginn an bei der Programmierung darauf achten, solche Befehle zu vermeiden. Meine Erfahrung mit dem Vorsatz: Das mache ich später ist, man schreibt das Programm später meist komplett neu. Also kostest es nicht nur Rechnerzeit sondern auch Deine Zeit und ist Dir Deine Zeit so wenig Wert?
Zum Vergleich mit und ohne Select schau Dir auch mal diese Beispielarbeitsmappe an: mit und ohne select Auf meiner Homepage sind alle meine Beispiele ohne Select. Da kann man sich also einige Lösungsansätze zu diesem Thema ansehen.

Anzeige
AW: Bereich auswählen auf Basis der Spaltennummern
10.09.2008 18:34:08
fcs
Hallo Eberhard,
die folgende Inputbox-Konfiguration erlaubt auch die Auswahl einer Zelle. zumindest unter Excel 2003.
Gruß
Franz

Sub aaTest()
Dim rngZelle As Range, wks As Worksheet, rngBereich As Range
On Error GoTo Fehler
Set rngZelle = Application.InputBox(Prompt:="Bitte Zelle auswählen", _
Title:="Test-Makro", _
Type:=8)
Set wks = ActiveSheet
With wks
Set rngBereich = .Range(.Cells(rngZelle.Row, 3), .Cells(rngZelle.Row, 5))
rngBereich.Select
End With
Fehler:
If Err.Number  0 Then
If rngZelle Is Nothing Then
MsgBox "Es wurde keine Zelle gewählt."
End If
End If
End Sub


Anzeige
AW: Bereich auswählen auf Basis der Spaltennummern
10.09.2008 18:34:10
fcs
Hallo Eberhard,
die folgende Inputbox-Konfiguration erlaubt auch die Auswahl einer Zelle. zumindest unter Excel 2003.
Gruß
Franz

Sub aaTest()
Dim rngZelle As Range, wks As Worksheet, rngBereich As Range
On Error GoTo Fehler
Set rngZelle = Application.InputBox(Prompt:="Bitte Zelle auswählen", _
Title:="Test-Makro", _
Type:=8)
Set wks = ActiveSheet
With wks
Set rngBereich = .Range(.Cells(rngZelle.Row, 3), .Cells(rngZelle.Row, 5))
rngBereich.Select
End With
Fehler:
If Err.Number  0 Then
If rngZelle Is Nothing Then
MsgBox "Es wurde keine Zelle gewählt."
End If
End If
End Sub


Anzeige
AW: Bereich auswählen auf Basis der Spaltennummern
11.09.2008 13:14:00
Eberhard
Vielen Dank
- Andi
- Hajo_Zi
- fcs
Es hat mir sehr weitergeholfen, denn in VBA bin ich sowieso ein totaler Frosch :-).
In Makro 4.0 hatte ich meine Standardlösungen parat.
In VBA leider noch nicht.
Ich hangle mich von hier ab weiter voran (vermutlich bis zum nächsten Hänger... :-) ).
Ich bin ja auch ein extremer Fußgänger, was meine Lösungen angeht.
Liebe Grüße an Euch
Eberhard König

307 Forumthreads zu ähnlichen Themen

Spalten aus über 400 excel files auslesen
marky

Hallo Excel Freaks !
Habe folgendes Problem.
Ich möchter über ein makro auf einen Ordner Zugreifen indem sich über 400 excel files befinden. Die excel files beinhalten nur ein Sheet wobei dieses den Namen des files hat (Also nicht Tabelle 1 oder Sheet 1 oder so).
Ich möchte dass das...
03.09.2008 21:44:41
Thread-ID: 1007240
5 Beiträge
Anzeige
Array Splitten Transponse Ausgabe in 2 Spalten
chris

Hallo VBA experten,
ich habe eine frage und bitte um eure Hilfe.
Ich komme alleine nicht weiter:(
Ich habe eine Tabelle1. In Spalte 1 Stehen z.b Werte untereinander.
27>27
17>17
6>6
17>1
usw...
diese möchte ich gerne in ein Array übernehmen und da...
23.04.2009 10:44:32
Thread-ID: 1070604
10 Beiträge
Spezialfilter mit ausgewählten Spalten
Michi

Liebe Gemeinde,
eine Tabelle mit ca. 50 Spalten soll per Spezialfilter ausgelsen werden. Das ganze wird per Makro und Schalfläche ausgeführt.
Soweit ich das verstehe ist beim Spezilafilter aber nur die filterung von Splaten möglich, die direkt nebeneinander liegen. Ich hingegen möchte...
13.05.2009 17:14:31
Thread-ID: 1074880
7 Beiträge
Anzeige
kombinationen aus spalten bilden
gh

hallo zusammen,
gibt es bei excel eine möglichkeit aus spalte 1 und 2 oder 1, 2 und 3 kombinationen zu bilden?
vielen dank im voraus!
lg
25.09.2009 12:52:27
Thread-ID: 1105553
11 Beiträge
Datum aus 2 spalten filtern
Gregor

Hallo
Ich habe in Spalte M ein Datum "Ausführung Beginn" und in Spalte N ein Datum "Ausführung Ende". Wie kann ich für einen bestimmten Zeitraum alle Daten zwischen Ausrührung Beginn und Ausführung Ende filtern. Zb. alle Arbeiten die in der Zeit vom 1.11.10 und 31.11.10 ausgeführt werden bz...
18.11.2010 20:16:31
Thread-ID: 1187609
3 Beiträge
alle Kombinationen aus zwei Spalten ermitteln
Jockel

Hallo,
ich habe eine Tabelle mit zwei Spalten:
A_____________B______________
Beleg_________Code__________
125___________60____________
125___________40____________
122___________30____________
122___________30____________
usw.
Ich möchte nun per Makro ermitte...
25.01.2011 09:28:18
Thread-ID: 1197160
4 Beiträge
+/- Ausgabe aufgrund Folge von 2 Spalteneinträge
2

Hallo Excelianer,
habt Ihr eine Idee, wie ich die +/- Einträge automatisiert auf Basis der 2 Regelen darstellen kann.
Die Spalten F,G,H, sind lediglich Hilfsspalten.
Ich scheitere immer daran, wenn ich auf einen vorherigen Block schauen muss. In Regel 1 muss ich ja im selben Bereic...
13.05.2011 16:01:26
Thread-ID: 1213743
2 Beiträge
Bedingte Formatierung - Differenz aus 2 Spalten
Grenouille

Hallo!
Ich suche nach einer Möglichkeit, mit bedingter Formatierung direkt sichtbar zu machen, ob eine Differenz zwischen 2 Spalten negativ wird.
Ich habe 2 Spalten:
HABEN und SOLL
und hätte gerne, dass die Spalte HABEN rot markiert wird, wenn die Zahl, die darin steht kleiner i...
25.11.2011 10:17:46
Thread-ID: 1239376
4 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
4
3
9
6
8
10
2
3
1
3
14
7
6
3
10
6
7
4
6
4
3
4
1
19
2