Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 14:04:05
PDF per VBA ausgeben - Seitenskalierung
19.04.2024 13:58:02
Set Worksheet geht im O365 aber im Excel 2016 nicht
19.04.2024 13:49:38
Per Kopfdruck als pdf speichern und Mail erstellen
19.04.2024 12:58:59
Daten einfügen aus anderem Sheet
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1548to1552
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1548to1552
1548to1552
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wert wird nicht in Makro erkannt

Wert wird nicht in Makro erkannt
19.03.2017 12:59:54
Thomas
Hallo,
in der Beispieldatei zählt im Hintergrund ein Makro die gewonnen Spiele (Dartspiel) von der Tabelle B4:C23 aus. Die Werte in von B4:C23 werden über SVERWEIS aus der gelb markierten Tabelle geholt.
Mein Problem ist dass das Makro die Werte über SVERWEIS nicht erkennt! Wenn ich in der Tabelle B4:C23 manuell "Einsen" eintrage, wird dies in der Auswertung E5:H5 ausgewertet.
Wer kann mir weiterhelfen damit die Werte über den SVERWEIS über das Makro erkannt werden.
(Meine Kenntnisse hierfür reichen leider noch nicht aus)
https://www.herber.de/bbs/user/112279.xlsm

15
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wert wird nicht in Makro erkannt
19.03.2017 13:07:00
Werner
Hallo Thomas,
stell mal das Makro hier separat ein - ich kann im Moment keine .xlsm runter laden.
Gruß Werner
AW: Wert wird nicht in Makro erkannt
19.03.2017 13:11:23
Thomas
Modul 1:
Sub SetUndLegs()
Application.ScreenUpdating = False
Dim Spieler1 As Integer
Dim Spieler2 As Integer
Spieler1 = 0
Spieler2 = 0
Dim lastEins
Dim i As Long
Dim lastRow As Long
lastRow = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row
Range("E5:H5") = 0
For i = 4 To lastRow
Spieler1 = Spieler1 + Range("B" & i)
Range("E5") = Spieler1
Spieler2 = Spieler2 + Range("C" & i)
Range("G5") = Spieler2
If Range("E5") = 3 Then
Range("E5") = 0
Range("F5") = Range("F5") + 1
Range("G5") = 0
Spieler1 = 0
Spieler2 = 0
End If
If Range("G5") = 3 Then
Range("G5") = 0
Range("H5") = Range("H5") + 1
Range("E5") = 0
Spieler1 = 0
Spieler2 = 0
End If
Next i
End Sub Tabelle 1
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("B4:C30")) Is Nothing Then 'Bereich anpassen
Call SetUndLegs
End If
End Sub

Anzeige
AW: Wert wird nicht in Makro erkannt
19.03.2017 13:16:11
Crazy
Hallo
du nutzt das Change-Ereignis in den Zellen B4 bis C23
da sollte aber das Calculate-Ereignis stattfinden
oder du nutzt den gelben Bereich
MfG Tom
AW: Wert wird nicht in Makro erkannt
19.03.2017 13:24:13
Thomas
Hallo,
danke für die Information.
Was muss ich umstellen ?
Meine Kentnisse reichen hierfür leider noch nicht aus
AW: Wert wird nicht in Makro erkannt
19.03.2017 13:28:12
Crazy
Hallo
du machst die Eintragung wohl im gelben Bereich
schau mal ob es so passt
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("H10:I29")) Is Nothing Then 'Bereich anpassen
Call SetUndLegs
End If
End Sub
MfG Tom
Anzeige
AW: Wert wird nicht in Makro erkannt
19.03.2017 13:35:03
Thomas
Passt, super vielen Dank!!!
AW: Wert wird nicht in Makro erkannt
19.03.2017 14:41:13
Thomas
Hallo Tom,
eine Frage, jetzt wird das Makro über H10::I29 eingelesen, richtig?
Wenn ich aber möchte dass das Makro weiter die Werte über B4:C23 (über den SVERWEIS)einlesen soll, was muss ich dann hierzu verändern ?
In der gelben Tabelle gebe ich die Daten manuell ein. Die Daten sollen in die Tabelle B4:C23 über SVERWEIS eingetragen (übermittelt) werden und das Makro soll von der Tabelle B4:C23 die Daten einlesen.
Was muss ich dann verändern?
AW: Wert wird nicht in Makro erkannt
19.03.2017 16:57:20
Crazy
Hallo
das Makro liest immer noch die Werte aus Spalte B und C ein
aber das Makro wird nur durch manuelle Zelländerung (Worksheet_Change) angestoßen
da dein ursprüngliches Change-Ereignis aber nur in den Zellen B4 bis C23
reagiert und dort aber keine manuelle Veränderung stattfindet
wird "SetUndLegs" nicht ausgelöst
MfG Tom
Anzeige
AW: Wert wird nicht in Makro erkannt
19.03.2017 17:16:22
Thomas
Hallo,
ich verstehe leider nur ein Teil, da ich nicht wirklich ein Excelprofi bin.
Mein Problem, weshalb ich so nachfrage ist, ich habe eine etwas größere Datei zusammengestellt. Ich beziehe die Werte von einer anderen Tabelle und deshalb frage ich mich wie ich es machen kann dass die Werte aus der Tabelle mit den SVERWEISEN ausgelesen wird, weil wie schon gesagt ich die Daten ursprünglich aus anderen Tabellen beziehe.
Gibt es da eine einfache Lösung für mich was ich machen / umstellen kann ?
Danke schon mal für die ganzen Bemühungen!
Tom hat es doch schon vorgeschlagen...
19.03.2017 17:43:33
robert 

Private Sub Worksheet_Calculate()
If Not Range("B4:C30") Is Nothing Then
Call SetUndLegs
End If
End Sub
Gruß
robert
Anzeige
AW: Tom hat es doch schon vorgeschlagen...
19.03.2017 17:55:34
Thomas
Ah, OK, jetzt funktionierts.
Vielen lieben Dank euch allen.
Ihr habt mir sehr weitergeholfen!
AW: Wert wird nicht in Makro erkannt
20.03.2017 08:38:15
Thomas
Guten morgen,
hab es soweit wie ihr mir gezeigt hab in meine Tabelle übernommen.
Nun kommt die Meldung:
Laufzeitfehler 13, Typen unverträglich
Was bedeutet das und wie kann ich das beheben ?
einmal geht's, einmal nicht...
20.03.2017 10:06:18
robert
Hi,
wieso schreibst Du es funktioniert und bedankst dich,
heute geht es nicht ?
Zeig deine Datei wo der Fehler kommt.
Gruß
robert
AW: Wert wird nicht in Makro erkannt
20.03.2017 20:31:19
Thomas
Hallo,
sorry, bei der Beispieldatei funktionierts, deshalb hab ich es so geschrieben.
Hab das Makro in meiner anderen Datei verändert und dort funktionierts nicht...
https://www.herber.de/bbs/user/112315.xlsm
Die Werte werden aus Tabelle T3:U22 in die Tabelle CG4:CI23 mit SVERWEIS übertragen.
Es sollte in CA3:CD3 ausgewertet werden, was es aber nicht so macht (ohne Fehlermeldung) wie es sein sollte.
Sorry bin noch Anfänger und hab noch nicht alzuviel Erfahrung mit Excel...
Gruß Thomas
Anzeige
AW: Wert wird nicht in Makro erkannt
21.03.2017 08:05:22
Thomas
Guten morgen,
noch zu ergänzen,
betrifft Arbeitsblatt Àuswertung, 2 Spieler!
Wenn die Summe `501`in Spalte E oder J errechnet wird wird eine 1 in die Tabelle S2:U22 übermittelt.
Die Tabelle CG3:CI23 holt sich den Wert aus der erst genannten Tabelle.
Wenn nun in der der Spalte E oder J die 501 auftaucht dann erhalte ich die Meldung `Laufzeitfehler 13, Typen unverträglich.

314 Forumthreads zu ähnlichen Themen

Format(etwas, "sonstwas") wird nicht erkannt
Mike

Hallo zusammen,
in einigen VBA-Projekten wird "Format" nicht erkannt. Meldung: "Fehler beim kompilieren, Falsche Anzahl an Argumenten oder Zuweisung einer Eigenschaft"
Öffne ich im gleichen VB-Editor eine neue Mappe/Projekt funktioniert es für die neue Mappe nicht aber für besagte alte...
20.08.2008 11:13:00
Thread-ID: 1003138
16 Beiträge
Anzeige
Datum in Zahl umwandeln
P.Mackes

Hallo,
was ich machen möchte ist folgendes:
ich habe eine Zahl, die ein Datum darstellt, z.B. 20080507. Dabei handelt es sich NICHT um ein Datumsformat, sondern um eine richtige Zahl. Jetzt muss ich davon allerdings 90 Tage abziehen. Also wandle ich mit Date(left...mid...right) das gan...
27.11.2008 00:37:57
Thread-ID: 1028186
3 Beiträge
Wochentag Formatierung mit TTT wird nicht gezählt
Rolf

Hallo Fachleute,
ich habe einen Dienstplan in Excel bei dem die Monate auf je einem Tabellenblatt stehen.
Also wie ein Kalender. In einem anderen Tabellenblatt werden verschiedene Auswertungen mittels Funktionen oder einfacher Formeln erstellt.
So z.B: sollen bestimmte Dienste di...
14.12.2008 17:15:00
Thread-ID: 1032800
11 Beiträge
Anzeige
Zelleninhalt wird bei Wenn-Abfrage nicht erkannt
CheHerbers

Hey,
ich habe eine Wenn-Abfrage, die prüfen soll, ob A1kleinerA2.
In A1 und A2 stehen jeweils Datum mit Uhrzeit.
A1 = 17.02.2009 10:42:35
A2 = 17.02.2009 10:43:57
A1 fülle ich über ein Makro.
Code:
Sheets("Daten").Range("A1") = ComboBox1.Value & " " &...
18.02.2009 10:35:00
Thread-ID: 1051714
4 Beiträge
Datum in Textbox in eine Zahl umwandeln
TCO99

Hallo zusammen,
ich habe folgendes Problem.
In einer Spalte einer Tabelle befinden sich Datumsangaben. Ich filtere diese Liste nach einem Datum. Dieses Datum wird vor der Filterung in eine Textbox eingegeben. Als richtiges Datum fuktioniert die Filterung aber nicht mehr. Da habe ich ei...
26.02.2009 23:31:12
Thread-ID: 1054555
15 Beiträge
Datum in Zahl umwandeln
Johannes

Hallo!
Habe eine Frage zu Excel:
Ich möchte über eine WENN-Funktion das Datum aus G2 als Zahl in dem entsprechenden Feld (AJ - AP) haben.
Z.B. für "Freitag, 2. Januar 2009" soll in der Spalte AN eine 1 stehen.

Über Hilfe wäre ich SEHR dankbar.
Liebe Grüße
Johannes
04.03.2009 12:20:18
Thread-ID: 1056301
7 Beiträge
Information von Zelle wird nicht erkannt
Zelle

https://www.herber.de/bbs/user/60476.xls
Hey Leute
eigentlich habe ich hier ein gutes program aber in Ausgang gibt es ein problem ich denke es ist ganz klein.
jedoch für mich risig da ich es nicht lösen kann, siehe beispiel.
vielleicht kann mir jemand helfen, bin aber kein prof...
19.03.2009 18:25:55
Thread-ID: 1061948
9 Beiträge
VLookup wird nicht erkannt
Werner

VBA-Level: befriedigend
Hallo Freunde,
bei folgender CodeZeile bekomme ich immer eine Fehlermeldung (es soll der Wert in Spalte 5 des
Worksheets "BeispielSheet" ermittelt werden, wenn in Spalte A dessen Wert numerisch "1900"
betraegt.) Excel teilt mit, dass es "VLookUp" nicht ke...
02.04.2009 09:22:02
Thread-ID: 1066196
5 Beiträge

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
15
7
2
10
3
3
14
6
8
4
3
1
7
16
3
2
2
7
2
1
5
5
2
19
6