Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
404to408
404to408
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

activecell -> die obere, untere, linke und rechte

Forumthread: activecell -> die obere, untere, linke und rechte

activecell -> die obere, untere, linke und rechte
soendi
hallo leute!
ich sollte eine lösung haben, wie ich von der activecell die obere, die untere, die linke und die rechte anschliessende zelle ansprechen kann. (alle nacheinander, rheienfolge ist wurst!
weiss jemand rat?
gruss
soendi
Anzeige
AW: activecell -> die obere, untere, linke und rechte
Ramses
Hallo
ActiveCell.Offset(0,-1) 'Die linke
ActiveCell.Offset(-1,0) 'Die obere
ActiveCell.Offset(0,1) 'Die rechte
ActiveCell.Offset(1,0) 'Die untere
Gruss Rainer
AW: activecell -> die obere, untere, linke und rechte
soendi
hmm... ich brauche 'ne selection... (da ich ein selection_change-event eingebaut habe... funktioniert das?
problemstellung 'lights-out'
die angeklickte zelle ändert und die obere, rechte, linke und untere müssen auch wechseln.
(von 'nix' nach 'x' und umgekehrt)
gruss
soendi
Anzeige
AW: activecell -> die obere, untere, linke und rechte
soendi
da ich ein selection_change ereignis habe, und eine andere zelle angewählt wird (nehmen wir mal an, die untere), dann beginnt das makro von vorne und es nimmt wieder die untere, die untere, die untere, etc... das will ich aber nicht...
weiss wer ne lösung?
gruss
soendi
Kannst du das mal präzisieren ?
Ramses
Hallo
ich verstehe nur noch Bahnhof ?
Das war deine Frage:
"...ich sollte eine lösung haben, wie ich von der activecell die obere, die untere, die linke und die rechte anschliessende zelle ansprechen kann. (alle nacheinander, rheienfolge ist wurst!.."
Die habe ich beantwortet
... und was willst du nun wirklich ?
Gruss Rainer
Anzeige
hab die lösung... geschlossen! o.T.
25.03.2004 15:30:54
soendi
hab die lösung... geschlossen!
AW: activecell -> die obere, untere, linke und rechte
Abc
Option Explicit
Public 

Sub ActiveCell_Nachbaren_Rot()
On Error Resume Next
Dim lngZeile As Long
Dim intSpalte As Long
Dim rngActZelle As Range
If (ActiveSheet Is Nothing) Then Exit Sub
Set rngActZelle = ActiveCell
For intSpalte = (rngActZelle.Column - 1) To (rngActZelle.Column + 1)
For lngZeile = (rngActZelle.Row - 1) To (rngActZelle.Row + 1)
If Not (intSpalte = rngActZelle.Column And lngZeile = rngActZelle.Row) Then _
Cells(lngZeile, intSpalte).Interior.ColorIndex = 3
Next lngZeile
Next intSpalte
End Sub

Anzeige
AW: activecell -> die obere, untere, linke und rechte
26.03.2004 12:05:06
soendi
danke für die antwort, aber ich darf sie nicht direkt ansprechen, da sonst das worksheet_change ereignis wieder greift... und das ist dann der teufelskreis.
hab die lösung bereits gefunden!
gruss
soendi
;

Forumthreads zu verwandten Themen

Hintergrundfarbe auf dem Bildschirm nicht darstell
Alois

Wie ist es möglich, dass plötzlich die Tabellen nicht mehr mit Hintergrundfarbe formatierbar sind. Auch manuelle Formatierung einzelner Zellen ist nicht möglich.
Bei bereits vorhandenen Tabellen fehlt nach dem laden der Datei ebenfalls die farbliche Zellenformatierung. Sie ist nicht mehr vo...
15.12.2008 01:17:00
Thread-ID: 1032915
2 Beiträge
Hintergrundfarben zählen, Anpassung gesucht
Fenja

Hallo für ein zweites mal heute.
Ich habe in Zeile D3 bis AK3 mehrere Zellen, die eine grüne (leuchtend grün) Hintergrundfarbe haben.
Diese (grünen Farbindex müsste "4" sein) möchte in Zelle AO3 Zählen lassen.
Folgendes habe ich im recherchiert kann es aber nicht selber anpassen.
16.04.2009 22:39:44
Thread-ID: 1069192
4 Beiträge
Anzeige
Makro Zeitintervall und verdichten
Lutz

Hallo Excel-Profis,
ich muß Temeraturdaten laufend auswerten und wollte einmal fragen, ob jemand eine Idee hat wie man das machen kann.
Ich bekommen im Moment alle paar Sekunden eine Temeraturmeldung. Die kann ich über eine Abfrage schon in eine Excel Zeile geschrieben bekommen.
Nun...
14.05.2010 17:09:58
Thread-ID: 1157023
7 Beiträge
Anzeige
Bereichspos obenrechts und unten links abfragen
Peter

Guten Tag
Mit den unten angefügten Funktionen frage ich die erste (oben links) resp. die letzte (unten rechts) Zelle eines Bereichs ab.
Nun möchte ich auch noch die Zelle rechts der ersten Zeile des Bereichs und die Zelle links der letzten Zelle abfragen können.
Beispiel:
Bereic...
17.08.2010 09:05:21
Thread-ID: 1172525
3 Beiträge
Zeichen von rechts und von hinten löschen
rechts

Hallo
Ich habe eine Tabelle, in der sind die Spaltenköpfe zum Teil nach folgendem Muster beschriftet:
Anzahl_BB_M2
(01.-31.01.2012)
(ACHTUNG: Nach M2 kommt ein Zeilenumbruch)
Ich habe nun versucht, aus dem Datum, dass sich in diesem String befindet, den Monat und das Jahr zu...
05.10.2012 13:15:06
Thread-ID: 1280673
5 Beiträge
Anzeige
Syntaxfehler und ich finde ihn nicht
Jenny

Hallo an alle,
unten stehendes Makro meldet beim Kompilieren im fett/kursiven Teil einen Syntaxfehler, kann mir da jemand helfen?
Gruß
Jenny
Sub Makro1() ' Makro1 Makro ' Tastenkombination: Strg+y Dim lngAnzahl As Long, rngZelle As Range lngAnzahl = 0 If Intersect(Sheets(Sheets....
26.05.2013 10:29:39
Thread-ID: 1314942
11 Beiträge
ODER-Argumente aus Liste und nicht einzeln
Lars

Hallo zusammen,
ich suche eine Lösung für nachfolgendes Problem bei der ODER-Funktion:
1) Ich habe Fehlermerkmale a,b,c,d,e,f,g,..., die in einer Spalte gelistet sind.
2) Die Merkmale möchte ich Oberbegriffen zuordnen,
z.B. 1 für a,b,c; 2 für d,e,f; 3 für g,...
3) In einer n...
14.06.2013 11:03:12
Thread-ID: 1317677
10 Beiträge
Anzeige
Datei wird nicht gefunden, obwohl existent
Markus

Guten Tag zusammen,
ich habe mir Folgendes Makro geschrieben, doch leider findet er die Datei nicht, obwohl sie in dem Ordner abgelegt ist. Datei ist Test.xls. Der Rest des Makros funktioniert so wie er soll.
Gruß Markus
Sub Test_finden() Dim Datei As String Datei = "Test" Pfad = "...
14.07.2013 14:12:53
Thread-ID: 1322346
3 Beiträge
Datei wird nicht gefunden, obwohl existent
Markus

Guten Tag zusammen,
ich habe mir Folgendes Makro geschrieben, doch leider findet er die Datei nicht, obwohl sie in dem Ordner abgelegt ist. Datei ist Test.xls. Der Rest des Makros funktioniert so wie er soll.
Gruß Markus
Sub Test_finden() Dim Datei As String Datei = "Test" Pfad = "...
14.07.2013 14:23:39
Thread-ID: 1322349
4 Beiträge
Nachtstunden berechnen
Andreas

Hallo
Ich brauche eure hilfe
Möchte meine Nachtstunden berechnen.
In Spalte D1 steht 22 uhr
In Spalte E2 steht 3 Uhr
Nun möchte ich die stunden berechnen die ich in der nacht mache
Nachtschicht wird von 22 bis 5 uhr von meiner firma gezahlt.
Nun meine Frage :ich benö...
12.03.2014 15:48:56
Thread-ID: 1353260
5 Beiträge
Nochmals nachtstunden berechnen
Andreas

hallo
habe in d6 stehen 22:00 und in e6 4:00
nun möchte ich die nachtstunden berechnen die von 22 bis 5 gehn
welche formel gibt es dafür
12.03.2014 18:21:59
Thread-ID: 1353270
3 Beiträge
Schichtplan Überstunden berechnen
knuddel

Hallo,
ich habe hier ein Beispiel reingestellt: https://www.herber.de/bbs/user/97044.xls
Nun zum Problem. Ich möchte mit VBA im Schichtplan die Stunden berechnen die pro Kalenderwoche anfallen, also alles über 40 h soll gezählt werden.
Das funzt soweit gut solange der MA einer arbei...
13.04.2015 07:09:20
Thread-ID: 1420443
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige