Office: (Office 2016) Hilfe ich bekomme mein Makro mit VBA nicht zum laufen :(

Helfe beim Thema Hilfe ich bekomme mein Makro mit VBA nicht zum laufen :( in Microsoft Excel Hilfe um das Problem gemeinsam zu lösen; Hallo, ich bin noch ein relativer Neuling mit VBA und habe das folgende Problem: Ich habe eine relativ simple Tabelle erstellt (Name = Eingabe)... Dieses Thema im Forum "Microsoft Excel Hilfe" wurde erstellt von Paddel, 21. August 2019.

  1. Paddel Neuer User

    Hilfe ich bekomme mein Makro mit VBA nicht zum laufen :(


    Hallo,
    ich bin noch ein relativer Neuling mit VBA und habe das folgende Problem:

    Ich habe eine relativ simple Tabelle erstellt (Name = Eingabe)
    In einer zweiten Tabelle (Name = Sortiert) soll die erste Tabelle kopiert werden und bei Eingabe in die Tabelle (Eingabe) automatisch nach Alphabet sortiert werden.

    Das Kopieren habe ich über eine simple "Wenn-Formel" gelöst .. das funktioniert einwandfrei - das Sortieren klappt nur wenn ich die Eingaben in der zweiten Tabelle tätige ... leider bekomme ich den Bezug zwischen den beiden Tabellen nicht zum laufen und die Sortierung wird im unterem Bereich der Tabelle durchgeführt Hilfe ich bekomme mein Makro mit VBA nicht zum laufen :( :(
    Eine Sortierung von Z-A wäre ggf. auch kein Problem


    Der Tabellenbereich ist A2:H2000

    Die bisherigen VBA - Eingabe ist


    Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Application.Intersect(Target, Range("A1:H2000")) Is Nothing Then
    Range("A1:H2000").Select
    Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, _
    Header:=xlGuess, OrderCustom:=1, MatchCase:=False, _
    Orientation:=xlTopToBottom
    Range("A2").Select

    End If

    End Sub

    Kann mir hier ein toller freundlicher Mensch helfen?

    Vielen Dank

    Gruß Paddel
     
  2. Beverly
    Beverly Erfahrener User
    Hi,

    versuche es mal so (ungetestet):

    Code:
    Private Sub Worksheet_Change(ByVal Target As Range)
        If Not Application.Intersect(Target, Range("A1:H2000")) Is Nothing Then
            With Worksheets("Sortiert")
                .Range("A1").CurrentRegion.Sort Key1:=.Range("A2"), Order1:=xlAscending, _
                    Header:=xlYes, OrderCustom:=1, MatchCase:=False, _
                    Orientation:=xlTopToBottom
            End With
        End If
    End Sub
    Ich nehme an, die Tabelle hat auch eine Überschrift, da du ab A2 sortierst? Dann solltest du im Code auch angeben, dass eine Übershrift vorhanden ist - also Header:=xlYes anstelle Header:=xlGuess



    Bis später,
    Karin
     
    Beverly, 22. August 2019
    #2
Thema:

Hilfe ich bekomme mein Makro mit VBA nicht zum laufen :(

Die Seite wird geladen...
  1. Hilfe ich bekomme mein Makro mit VBA nicht zum laufen :( - Similar Threads - Hilfe bekomme Makro

  2. Hilfe bei "Zählenwenns"

    in Microsoft Excel Hilfe
    Hilfe bei "Zählenwenns": Liebe Experten! Bis jetzt hab ich durch durchforsten des Forums immer Hilfe gefunden. Diesmal leider nicht! Mein Problem: Ich habe einen Planer übernommen und ihn auf "dynamisch" umgestellt. Das...
  3. Hilfe Excel Formel

    in Microsoft Excel Hilfe
    Hilfe Excel Formel: Hallo, was muss ich bei der Formel verändern, um ein Ergebnis zu erhalten? Möchte in Zelle R7 wenn z.B. Feiertag steht, dass die Sollarbeitszeit berechnet wird und wenn in den Zellen M7-Q7 Zeiten...
  4. Benötige Hilfe bei SQL-Befehl

    in Microsoft Access Hilfe
    Benötige Hilfe bei SQL-Befehl: Hallo zusammen und alles Gute für 2025 Es ist mal wieder Sale-Zeit und jetzt müssen bei vielen Artikel zu eine festgesetzten Zeit die VK-Preise geändert werden. Man kann das in unserem...
  5. Hilfe bei der Diagrammerstellung in Excel

    in Microsoft Excel Hilfe
    Hilfe bei der Diagrammerstellung in Excel: Hallo miteinander, ich habe Messdaten einer Temperaturüberwachung, mit denen ich gerade ein wenig spiele und Einstellungen teste. Dazu habe ich mir ein Excel-Blatt gebaut, auf dem ich alle...
  6. Bitte um Hilfe für unsichtbares inhaltsverzeichnis

    in Microsoft Word Hilfe
    Bitte um Hilfe für unsichtbares inhaltsverzeichnis: Hi, vielen Dank schon mal im Voraus an alle, die sich die Zeit nehmen, mir bei meinem Problem zu helfen! Folgendes Problem habe ich: Ich möchte ein Inhaltsverzeichnis zum Navigieren im Dokument...
  7. Bekomme pst-Dateien einfach nicht übertragen. Hilfe!

    in Microsoft Outlook Hilfe
    Bekomme pst-Dateien einfach nicht übertragen. Hilfe!: Hallo ins Forum, ich bin bin so unglaublich frustriert von den MS-Produkten, aber ich muss irgendwie wieder arbeitsfähig werden. Daher hoffe ich hier auf Hilfe. Habe meinen Rechner letzte...
  8. Hilfe. Wie bekomme ich Spalten in den Vordergrund

    in Microsoft Excel Hilfe
    Hilfe. Wie bekomme ich Spalten in den Vordergrund: Brauche dringend Unterstuetzung bei Excel. Also ich habe vemutlich eine Probleme. Ich habe eine Excel Liste erstellt. Bei B gehen meine Fragen (runter) 1 - 30 und bei 1 gehen meine befragten...
  1. Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
    Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
    Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.
    Information ausblenden