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

Range(„A1“) aus anderer Tabelle auswähle

Forumthread: Range(„A1“) aus anderer Tabelle auswähle

Range(„A1“) aus anderer Tabelle auswähle
19.02.2022 00:25:37
Siegfried
Ich brauche mal wieder etwas Hilfe!
Wie kann ich in VBA eine bestimmte Zelle auswählen, ohne in diesem Tabellenblatt jedoch zu sein.
Mein Gedanke wäre dazu
  • Sheets(AUFZNAME).Range("N500").Select
    • gewesen, mit AUFZNAME ist der Tabellenblattname deklariert. Auf diese Art bekomme ich aber immer den Laufzeitfehler 1004 die Select-Methode des Range-Objektes konnte nicht ausgeführt werden.
    Von dieser Position Range(‘‘N500‘‘) sollte dann mit
  • Selection.End(xlUp).Select
    • der letzte eingetragene Wert kopiert werden, welcher dann wo anders eingetragen wird/werden soll, ohne jetzt wieder mit
  • Sheets(nnnn ).Select
    • ständig hin und her schalten zu müssen.
    Ich hoffe mir kann da einer von Euch Wissenden wieder weiterhelfen.
    LG Siegfried
    Anzeige

    7
    Beiträge zum Forumthread
    Beiträge zu diesem Forumthread

    Betreff
    Datum
    Anwender
    Anzeige
    AW: Range(„A1“) aus anderer Tabelle auswähle
    19.02.2022 01:07:42
    Matthias
    Hallo,
    Du musst logischer denken!
    Wie kann ich in VBA eine bestimmte Zelle auswählen, ohne in diesem Tabellenblatt jedoch zu sein.
    Mein Gedanke wäre dazu
    Sheets(AUFZNAME).Range("N500").Select
    gewesen, mit AUFZNAME ist der Tabellenblattname deklariert. Auf diese Art bekomme ich aber immer den Laufzeitfehler 1004 die Select-Methode des Range-Objektes konnte nicht ausgeführt werden.
    Das ist die Logik!

    Das ist genau so als ob Du in Deiner Wohnung im Flur stehst und in der Wohnstube den Tisch anfassen willst. Geht eben nicht, da Du Dich nicht dort befindest!
    Korrekt Referenzieren heißt hier die Lösung.
    Dazu gibt es viele Einträge im Archiv.
    Gruß Matthias
    Anzeige
    AW: Range(„A1“) aus anderer Tabelle auswähle
    19.02.2022 08:54:48
    RPP63
    Moin!
    Zunächst mal musst Du überhaupt nichts auswählen.
    https://www.online-excel.de/excel/singsel_vba.php?f=78 
    
Sheets(AUFZNAME).Range("N500").End(xlUp).Offset(1, 0).Value = "Rhabarber"
    Zu Deiner (nunmehr überflüssigen) Frage:
    Die Select-Methode funktioniert nicht tabellenübergreifend! Dafür gibt es:
    
Application.Goto Tabelle2.Range("A1048576").End(xlUp).Offset(1, 0)
    Gruß Ralf
    Anzeige
    AW: Range(„A1“) aus anderer Tabelle auswähle
    19.02.2022 11:31:42
    Gerd 
    
Sub Makro2()
Dim AUFZ As String
AUFZ = "DeinBlattname"
ActiveSheet.Range("A1").Value = Worksheets(AUFZ).Cells(Worksheets(AUFZ).Rows.Count, "N").End(xlUp).Value
End Sub

    AW: Range(„A1“) aus anderer Tabelle auswähle
    19.02.2022 13:38:46
    Siegfried
    Hallo Matthias L, RPP63 und Gerd L,
    eure Anregungen sind einfach traumhaft, kann damit wieder einiges dazulernen, nur er macht es leider nicht wie ich es möchte/brauchen würde.
    Ich muss hier z.B. prüfen ob Werte bereits eingetragen sind oder er mit (xlUp) an den Eintrag in Zeile 12 ankommt
  • If Sheets(AUFZNAME).Range("N500").End(xlUp).Offset(1, 0) = "Mo-Jh" Then

    • dann muss ein Wert aus einem anderen Tabellenblatt genommen werden, wenn nicht "Mo-Jh" dann eben den Wert durch
  • ActiveCell.Copy

    • Habe mir vor beiden Bedingungen die Abfrage
  • xEnd = ActiveCell.Row
    • gesetzt um eben zu prüfen können welche dies ist, kommt leider immer eine 6 heraus, müsste/sollte aber 12 oder höher ergeben.
    Was mache ich oder verstehe ich da falsch?
    Habe mir unmittelbar davor auch noch mit
  • oldSelect = ActiveSheet.Name
    • das momentan offene Tabellenblatt abgefragt, ist natürlich nicht das AUFZNAME, daher für mich nun einmal die Erklärung warum mir xEnd die 6 bringt = die Zellenposition im andern Tabellenblatt, was ist da bei mir falsch?
    LG Siegfried
    Anzeige
    AW: Range(„A1“) aus anderer Tabelle auswähle
    19.02.2022 14:57:34
    Siegfried
    So eine Korrektur habe ich vorgenommen, mit welcher nun die Abfrage "(xlUp)" wie gewünscht funktioniert, siehe
  • If Sheets(AUFZNAME).Range("N500").End(xlUp) = "Mo-Jh" Then
    • , nur befürchte ich wenn ich also nicht in der AUFZNAME mich befinde das bei der Abfrage
  • ActiveCell.Copy
    • nicht das richtige Ergebnis herauskommt, wie müsste ich diese Abfrage modifizieren um den Inhalt aus der AUFZNAME zu bekommen?
  • If Sheets(AUFZNAME).Range("N500").End(xlUp) = "Mo-Jh" Then
    Range("Regie!L33").Copy ' Mo-Jh Eintrag vom Mo Jänner
    Else
    ActiveCell.Copy ' Wert aus Spa N letzte geb. KW kopieren
    End If
    Sheets(AUFZNAME).Range("M1").PasteSpecial xlPasteValues ' Wert letzte geb. KW einfügen
    Application.CutCopyMode = xlCopy

    • LG Siegfried
    Anzeige
    AW: Range(„A1“) aus anderer Tabelle auswähle
    19.02.2022 16:18:10
    Siegfried
    Hallo Gerd L,
    habe nun mit deiner letzten Anregung
  • Sheets(AUFZNAME).Range("M1").Value = Worksheets(AUFZNAME).Cells(Worksheets(AUFZNAME).Rows.Count, "N").End(xlUp).Value

    • den Ersatz für
  • ActiveCell.Copy
    • gefunden, die Frage für mich, gibt es da nichts einfacheres als Ersatz, da muss ich jetzt einiges umbauen um mir so manchen wechseln bei den Tabellenblättern zu ersparen.
    LG Siegfried
    Anzeige
    AW: Range(„A1“) aus anderer Tabelle auswähle
    20.02.2022 08:36:51
    Gerd
    Hallo Siegfried,
    du kannst natürlich auch die Copy-Methode nehmen.
    
Sub Test()
Dim Quelle As Range
Dim Ziel As Range
With Sheets(AUFZNAME)
Set Quelle = .Cells(.Rows.Count, "N").End(xlUp)
Set Ziel = .Range("M1")
End With
If Quelle.Value  "Mo-Jh" Then
Quelle.Copy
Ziel.PasteSpecial xlPasteValues
Application.CutCopyMode = False
Else
End If
Set Ziel = Nothing: Set Quelle = Nothing
End Sub
    Gruß Gerd
    Anzeige

    Forumthreads zu verwandten Themen

    Zellinhalt aus anderer Tabelle übernehmen
    Marc

    Hallo zusammen,
    habe ein Problem mit dem ich einfach nicht weiterkomme (wahrscheinlich für Euch kein Problem...!)
    Ich möchte aus einer Tabelle Zellinhalte in eine andere Tabelle im gleichen Arbeitsblatt übernehmen, d.h. aus Tabelle 2 soll der Zellinhalt aus D61 in Tabelle 1 in H60 über...
    21.08.2008 22:08:00
    Thread-ID: 1003658
    3 Beiträge
    Kombinationsfelder mit Daten aus anderer Tabelle
    Bernhard

    Hallo liebe Freunde,
    ich brauche wieder einmal Eure Hilfe beim Umstricken eines VBA Codes, den ich hier im Archiv gefunden habe.
    Die Userform hat u.a. 2 Kombinationsfelder, die mit den Daten aus den Spalten B bzw. C gefüllt werden. Wenn ich die Auswahl in Kombi1 treffe, wird Kombi2 glei...
    25.08.2008 15:48:18
    Thread-ID: 1004492
    8 Beiträge
    Daten sortiert aus anderem Tabellenblatt auslesen
    Robert

    Hallo,
    bräuchte eure Hilfe bitte.
    Aus einem Tabellenblatt ("FEHLZEITEN") sollen Daten ausgelesen und in einem anderen Tabellenblatt ("EINSATZPLANUNG") ab Zeile 100 eingefügt und bei Änderungen in "FEHLZEITEN" aktualisiert werden.
    Habe da mal eine Beispieldatei zur besseren Veransch...
    28.08.2008 11:32:00
    Thread-ID: 1005356
    3 Beiträge
    Zeile mit Werten aus anderer Tabelle vergleichen
    onkelbobby

    Hi,
    ich versuche folgendes in meine Datei einzubauen.
    Tabelle 2 enthält Adressdaten und eine Infospalte. In diese Infospalte kann der Wert "S" oder der Wert "A" eingetragen werden.
    In Tabelle 1 sind auch diverse Adressdaten gepflegt. Alle Adressen in Tabelle 1 sind auch in Tabelle 2...
    29.08.2008 10:37:00
    Thread-ID: 1005722
    3 Beiträge
    Bestimmten wert aus anderer Tabelle ermittlen.
    Torsten

    stehe gerade etwas auf dem schlauch....grummel sehe bestimmt den formel vor zeilen nicht ;)
    also mal meion problem mal kurz umrissen:
    Tabelle A - sheet1
    Spalte B : Nummern
    Spalte G : Bezeichner
    Tabelle B - sheet2
    Spalte G : Nummern
    Spalte H : Bezeichner
    erklärung...
    10.09.2008 17:31:48
    Thread-ID: 1008877
    2 Beiträge
    Anzeige
    Werte aus anderem Blatt für ComboBox auslesen
    mtremer

    Hallo Excel-Freunde,
    ich glaub ich werde verrückt.
    Meine ComboBox füllt sich nicht mehr. Ich versuche den Code so zu ändern, dass die Quelle für die ComboBox wo anders stehen kann. Im folgenden Code müssen die Werte in der Spalte A der Tabelle1 stehen.
    Private Sub Worksheet_Change...
    17.09.2008 13:17:34
    Thread-ID: 1010349
    11 Beiträge
    Dropdown-Auswahlliste: Ausgabe anderer Text
    Daniel

    Hallo
    Ich habe eine Dropdown-Auswahlliste erstellt, die auch funktioniert. Nun möchte ich aber, dass aus Platzgründen ein anderer (kürzerer) Text ausgegeben wird als in der Auswahlliste angezeigt wird.
    Beispiel: Anzeige = Telefon ----- Ausgabe im Feld = Tel.
    Ist das überhaupt mac...
    04.12.2008 08:58:00
    Thread-ID: 1030032
    2 Beiträge
    Dropdown Liste aus einem seperaten Arbeitsblatt
    0ogni0

    Hallo und Hilfe
    Ich möchte eine Liste aus einem anderen Arbeitsblatt oder einer anderen Mappe als Dropdown Zelle erstellen.
    Ist das möglich und wenn ja wie?
    Gruß und Dank
    Ingo
    23.02.2009 11:55:09
    Thread-ID: 1053023
    3 Beiträge
    Tabellenblatt von anderer Stelle auswählen
    anderer

    Hallo,
    ich würde gerne in einer Datei eine Zusammenfassung darstellen, und gebe dazu einen Namen eines Tabellenblattes einer anderen Datei ein, aus der dann eine Zelle übernommen wird. Ziel ist es in der Zusammenfassung z.b. 2012 als Jahr (Name des Tabellenblattes) einzugeben und ich bekomm...
    01.03.2009 17:58:31
    Thread-ID: 1055267
    5 Beiträge
    Listenkriterien aus anderem Blatt
    Philipp

    Hallo liebe Herber-Gemeinde,
    ich möchte für meine Dropdown-Auswahlliste die Kriterien aus einem anderen Tabellenblatt verwenden.
    Unter [Daten] - [Gültigkeit] - [Zulassen] - [Liste] steht allerdings, dass die Kriterien in der selben Tabelle abegelegt sein müssen.
    Geht das auch ander...
    14.04.2009 10:12:55
    Thread-ID: 1068538
    18 Beiträge
    Anzeige
    Texte aus anderem Tabellenblatt kopieren
    Stefan

    Hallo zusammen,
    in einer Tabelle habe ich mir im Tabellenblatt 'Umwandeln' für verschiedene Textmanipulationen Formeln eingerichtet. Die Texte, die verändert werden sollen (Artikelbezeichungen) bekomme ich in Form einer Exceltabelle und ich ziehe mir das Tabellenblatt 'Artikel' als neues Ta...
    22.04.2009 23:35:00
    Thread-ID: 1070529
    3 Beiträge
    Drop down Liste einfügen
    natka

    Hallo,
    ich möchte gerne für eine bestimmte Zelle eine Drop-Down-Auswahlliste zuweisen. In der Drop Down Liste sollen Monate zur Auswahl stehen.
    Wie kann ich dies tun. Zum einen die Liste erstellen und die Verknüpfung zur Zelle realisieren?
    Vielen Dank im Voraus
    Natka
    15.05.2009 15:50:19
    Thread-ID: 1075526
    3 Beiträge
    Anzeige

    Beliebteste Forumthreads (12 Monate)

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