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

A1 in cells(1,1), gibts es schon eine Formel?

Forumthread: A1 in cells(1,1), gibts es schon eine Formel?

A1 in cells(1,1), gibts es schon eine Formel?
06.08.2008 14:21:00
Tom
Hi,
ich möchte gerne eine Abfrage starten, über 2 Dateien. Ich will jetzt die Spalten von einer in die Andere kopieren. Ziel und Ausgangs SPalten sind nicht die selben. (Grober Hintergrund)
Jetzt will ich das Idiotensicher machen:
Also sollen die Damen die das benutzen nur den SPaltenname eingeben für das eine und das andere Dokument die Kopiert werden sollen.
Deshalb sollen sie A eingeben können. Aber dynamisch brauch cih ja cells(activecells.row,1). Gbits eine Formel die mir A in 1 Macht oder muss ich das mit Case für 256 Spalten machen?
mfg Tom

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: A1 in cells(1,1), gibts es schon eine Formel?
06.08.2008 14:27:58
Beverly
Hi Tom,
Cells(ActiveCell.Row, "A")

AW: A1 in cells(1,1), gibts es schon eine Formel?
06.08.2008 14:34:59
Daniel
oder so:

dim Spalte as String
Spalte = Inputbox("Bitte Spaltenanmen eingeben")
Range(Spalte & activecell.row)


Gruß, Daniel

Anzeige

Forumthreads zu verwandten Themen

Formel über VBA in Range.
Tom

Hi,
ich Versuch eine Summenformel
=SUMME(A3:A29)
verzweifelt über VBA dynamisch einzutragen.
Die Summe muss von A bis J eingetragen werden. Jedesmal mit dem entpsrechenden Buchstaben nicht immer mit A.
Hab das so versucht:
For k = 2 To 10 'Range(Cells(k, 29), Cells(...
13.08.2008 11:41:00
Thread-ID: 1001455
4 Beiträge
For each c in Bereich
Gregor

Hallo
Ich habe folgende Abfrage:
For Each c In Bereich
Wert = Cells(c.Row, 7).Value
If Wert "kein" Then
usw.
Ich möchte also bei c (Zeile) Spalte 7 den Wert abfragen und je nach Wert weiterfahren. Bereich ist in Spalte 5 definiert.
Wie komme ich zu dieser Zeilen-Nu...
24.10.2008 16:32:40
Thread-ID: 1019066
8 Beiträge
Daten fortlaufend von Formular in Range schreiben
Formular

Hi,
wie kann ich denn folgende Abfrage bzw kopieren erledigen:
Ich habe Ein Formular mit Textbox'n und Combobox'n
auf einem Bestimmte Tabellenblatt ("Daten") möchte ich nun die Folgenden Inhalte kopieren (button)
Auf dem Tabellenblatt ("Daten") habe ich ein Range B33 : F42 (also...
29.01.2009 09:26:24
Thread-ID: 1044806
3 Beiträge
Anzeige
for each zelle in sheet problem
thomas

Hallo Leute
Ich hab mal eine allgemeine Frage.
Und zwar möchte ich jede Zelle im sheet nach einem string durchsuchen.
Die Suche klappt auch soweit.
Nur möchte ich keine 2 For next schleifen verwenden sondern:
ZeileEnde=Sheets("Tabelle1").Cells(row.count,1).End(xlUp).row
...
08.04.2009 10:06:35
Thread-ID: 1067622
3 Beiträge
For Each zelle In Range("a2:a1000") erweitern
Karsten

Hallo,
Wenn ich diesen Befehl ausführe befinde ich mich gerade in Tabelle1. Ich möchte aber, dass u.s. Befehl in Tabelle2 ausgeführt wird. Kann mir jemand die Tabelle2 in den Befehl hineinkonstruieren.
Danke.
Gruß
Karsten
Dim zelle As Range
For Each zelle In Range("a2:a...
08.07.2009 10:59:35
Thread-ID: 1087125
3 Beiträge
Anzeige
For each zelle activecell.adress
Hartmut_M

Hallo, stehe im Moment neben mir.
Habe folgenden Code:
For Each zelle in [H12:X33]
If zelle.adress = [H12] then msgbox "OK"
Next
Also wenn der Name der Zelle H12 ist, soll eine Msgbox kommen. Funktioniert aber nicht.
Wo liegt mein Fehler?
Freu mich über jeden Tipp.
18.09.2009 18:09:00
Thread-ID: 1103973
5 Beiträge
Anzeige
Range in Array füllen, Problem bei Cells.Count = 1
Andreas

Hallo VBA Freunde,
ich habe es heute zum ersten mal angewandt, ein Array nicht mit einer Schleife, sondern gleich als einen Block zu füllen. Dank Renee konnte ich auch den Fehler beheben, daß ich mein Array nur eindimensional eingerichtet hatte.
Also für Ranges mit mehr als 1 Zelle funk...
22.02.2010 16:33:21
Thread-ID: 1140417
7 Beiträge
Anzeige
In For each rng weiterspringen
Gregor

Hallo zusammen
Ich suche nach einer Zellfarbe. Die Zeile dieser Zelle wird dann bis zu 15 Zeilen erweitert und kopiert (eruiert erste und letzte zu kopierende Zeile). Anschliessend muss die Suche dieser Zellfarbe nach der kopierten Zeile weiterfahren, ansonsten werden die gleichen Zeilen me...
18.05.2010 11:00:44
Thread-ID: 1157557
4 Beiträge
Conditional Formatting mit Data Range
Clemens

Hallo zusammen,
ich möchte eine visuelle Validierung einer Spalte durchführen. Dazu möchte ich die Werte einer Spalte mit einem Data Range auf einem anderen Excel Sheet vergleichen. Falls der Wert nicht Teil des Data Ranges ist, soll die Zelle rot eingefärbt werden.
Mit Conditional Form...
15.07.2010 19:10:47
Thread-ID: 1167359
3 Beiträge
Array direkt (ohne FOR) in Range schreiben
Thomas

Ich habe folgendes kleines Problem:Ich möchte die Daten aus einem Array, z.B.
Dim Ary(5,10) As Singledirekt (also ohne for-schleife) in ein Range-Objekt z.B.Range(cells(1,1), cells(5,10)) schreiben. Es ist auch wichtig, daß alle vorherigen Berechnungen mit dem Array durchgeführt wurden, als...
27.04.2002 12:44:15
Thread-ID: 116840
3 Beiträge
"For Each" für Datein ???
lupo

Hallo Forum.
Ich möchte in einem Ordner die Namen der Datein durchsuchen und vergleichen. Ist der vergleich ungleich, so sollen die Datein gelöscht werden.
Den Vergleich führe ich über die LIKE - Funktion durch.
Damit alle Datein verglichen werden, wollte ich FOR EACH einsetzen.
...
19.10.2010 02:25:08
Thread-ID: 1182974
4 Beiträge
Column der Activecell relativ zu einem Teilrange
Andreas

Hallo Herber Fans,
ich unterliege einer kleinen geistigen Blockade. Wie kann ich die Zellposition (Column) relativ zu einem Teilbereich feststellen? In der Beispieldatei gehe ich davon aus, daß Zelle C1 meine ActiveCell ist. Nun möchte ich über VBA feststellen, daß C1 die zweite Zelle im Te...
14.12.2010 17:19:58
Thread-ID: 1191450
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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