Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1676to1680
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
Inhaltsverzeichnis

VBA aktive Auswahl füllen mit Verweis-Inhalten

VBA aktive Auswahl füllen mit Verweis-Inhalten
21.02.2019 13:39:25
udo
Hallo Forum , sollte bitte bei folgender Schwierigkeit nochmal
eure Hilfe beanspruchen.
Ich habe einen Zeilenbereich von zB. Zeile 1-500 in dem ich nur Zeilenweise
( in einer einzelnen Zeile ) Selectiere von Spalte x nach xx ( egal ) unterschiedlich ...
Mache ich z.B. eine Selection in Zeile 230 von D230:AS230 so habe ich diese
in meiner Code-Anweisung mit Einträgen ( je beteiligte Zelle ) mit
Selection = "u"
angewiesen dies in jede Zelle dieser Auswahl einzutragen ...
Nun sollte ich es etwas modifizieren, ich habe dazu in Zeile 505 nun Formeln stehen
die mir je nach Spalte dort ein u zeigen oder eben nicht.
Und nun suche ich nach der Möglichkeit nach wie vor oben in den Zeile 1 - 500
irgendwelche Zellbereiche zu wählen und dann soll dieser Selection nicht direkt
einfach u eingetragen werden , sondern nur wenn in der Hilfszeile (505 ) dann eben in der jew. Spalte der Selection unten auch ein u steht, dann soll dies oben
eingetragen werden.
HAbt ihr evtl. eine Idee wie ich dies anpassen müsste ?
mit ner Art Offset ?
Selection = selection.offset(5059.value ? in der Art irgendwie
Ich schaffs allein leider nicht
wäre euch wiedermal sehr dankbar für etwas Hilfe hierzu
LG udo

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
ok, etwas habe ich gerade schon herausgefunden ..
21.02.2019 13:43:42
udo
Selection = Selection.offset(505).value
funktioniert somit schon, aber er rechnet damit zur Aktuellen Zeilennummer die 505 dazu ..
wie könnte ich es auf Zeile 505 fixieren ?
LG udo
habs glaub selber gelöst ...
21.02.2019 13:47:39
udo
Selection = Selection.Offset(505-ActiveCell.Row).Value
hmmm, zumindest klappts gerade schon mal ...
LG udo
Anzeige

299 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige