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

Wo liegt mein fehler

Forumthread: Wo liegt mein fehler

Wo liegt mein fehler
27.06.2005 11:05:12
nonguru
Was ist an dieser Funbktion für ein MAkro falsch
Function VLookup(Hauptmenü!B8;Artikel!A2:I9999;9;FALSCH)
Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wo liegt mein fehler
27.06.2005 11:07:15
Jan
application.VLookup(Hauptmenü!B8;Artikel!A2:I9999;9;FALSCH)
mfg Jan
AW: Wo liegt mein fehler
27.06.2005 11:10:22
nonguru
Hallo Jan,
leider nimmt er die Formel noch nicht an er wirft mir den ; nach B8 als Fehler aus
AW: Wo liegt mein fehler
27.06.2005 11:15:50
Jan
Hi,
hab ich übersehen, VBA will statt ; ein ,
mfg Jan
Anzeige
AW: Wo liegt mein fehler
27.06.2005 11:28:42
nonguru
Irgendwas mach ich immer Falsch ich könnte davonlaufen

Sub Berechnen()
Application.VLookup(Hauptmenü!B8, Artikel!A2.I9999, 9, FALSCH).Row = Nummer
Cells(Nummer, 9).Activate
wert_alt = Activate.Cells
wert_neu = wert_alt + Hauptmenü!Zugang
Cells = wert_neu
End Sub

ich will ne Berechnung verbinden
Anzeige
AW: Wo liegt mein fehler
27.06.2005 12:02:17
IngGi
Hallo nonguru,
die Funktion VLookup gibt nicht die gesuchte Zelle zurück, sondern den Inhalt dieser Zelle. Um die Zeilennummer der gesuchten Zeile zu erhalten, kannst du die VBA-Methode Find nutzen. Die Variable "Nummer", der du die Zeilennummer zuweist, muß dabei außerdem am Anfang stehen. Also:
Nummer = Sheets("Artikel").Range("A2:I9999").Find _
(What:=Sheets("Hauptmenü").Range("B8"), Lookat:=xlWhole).Row

Ich nehme an, dass du in der Zeile "wert_alt = Activate.Cells" den Wert der aktiven Zelle in die Variable "wert_alt" übergeben willst. Das müsste dann so aussehen:
wert_alt = ActiveCell
Schließlich sehe ich noch ein Problem mit der Zeile "Cells = wert_neu". Cells bezieht sich hierbei auf alle Zellen des aktiven Blattes. Ist das so gewollt? Gruß Ingolf
Anzeige
AW: Wo liegt mein fehler
27.06.2005 12:14:06
nonguru
Hallo Ingolf,
also leider kenn ich mich mit VBA noch sehr wenig aus ich habe eine Tabelle in dieser siche ich über sverweis daten nun möchte ich mit diesen daten was berechnen einen zu oder abgang da der wert aber in jeder Zeile der abelle stehen kann habe ich versuchrt es über die vorherbeschriben Methode in griff zu bekommen. Ich mächte folgendes tun: wert auslesen dann den zugang andiieren neuen wert an die Srtelle schreiben wo wert alt steht. Zugang so habe ich das FGeld gennat ich könnte auch Koordinaten angeben habe ich meine BErwechnung überhauot richtig eingebunden

Sub Berechnen()
Nummer = Sheets("Artikel").Range("A2:I9999").Find _
(What:=Sheets("Hauptmenü").Range("B8"), Lookat:=xlWhole).Row
Cells(Nummer, 9).Activate
wert_alt = ActiveCell
wert_neu = wert_alt + Hauptmenü!Zugang
Cells = wert_neu
End Sub

Anzeige
AW: Wo liegt mein fehler
27.06.2005 12:33:26
IngGi
Hallo nonguru,
hoffentlich hab' ich dich richtig verstanden. Versuch' mal folgendes:

Sub Berechnen()
Sheets("Artikel").Range("A2:I9999").Find _
(What:=Sheets("Hauptmenü").Range("B8"), Lookat:=xlWhole) = _
Sheets("Artikel").Range("A2:I9999").Find _
(What:=Sheets("Hauptmenü").Range("B8"), Lookat:=xlWhole) + _
Sheets("Hauptmenü").Range(Zugang)
End Sub

Gruß Ingolf
Anzeige
AW: Wo liegt mein fehler
27.06.2005 12:40:03
nonguru
Hallo Ingolf
leider bringt der mir da einen LAufzeitfehler 1004 objektdefinierter Fehler
ich werd noch zum Hirsch bin glaub zu blöd excel zu verstehen
gruß Andy
Anbei mal meine Datei ich weiß leider nicht ob damit was anfangen kannst
https://www.herber.de/bbs/user/24229.xls
Anzeige
AW: Wo liegt mein fehler
27.06.2005 13:40:52
IngGi
Hallo nonguru,
Excel hat wohl Probleme mit deinem Bereichsnamen "Zugang". Schreib an Stelle von "Zugang" "$F$8", dann sollte es gehen.
Gruß Ingolf
AW: Wo liegt mein fehler
29.06.2005 09:50:08
nonguru
Danke für Deine Hilfe nun funktioniert das Makro
;

Forumthreads zu verwandten Themen

Wo ist der Fehler?
Bernd

Einen schönen guten Morgen,
folgendes Problem habe ich:
Wie Ihr in der Tabelle sehen könnt, ist Andy auf platz 4 und Hery und Bernd auf Platz 5.
Wo ist da der Fehler in der Formel?
Tabelle2

 ABCD12PlatzNameverlorenhilfsspalte134Andy        1,30 €...
30.08.2008 07:15:00
Thread-ID: 1006008
3 Beiträge
wo ist der fehler?
stefan

Hallo,
ich habe eine spalte mit domainnamen (z.b domain.de oder domain.net). ich will daraus den wert ermitteln. wenn .de-domain, dann 1 ansonsten 1,5
habe folgende formel: =WENN(FINDEN(".de";$B2);1;1,5)
leider wirft er bei nicht .de-domains einen fehler aus und schreibt nicht 1,5 h...
09.12.2008 11:57:11
Thread-ID: 1031321
8 Beiträge
Fehlerhafte Kalenderwochenberechnung
reiner

Hallo Leute,
die mitgesandte Datei https://www.herber.de/bbs/user/58117.xlsx dient zur Erfassung von Bearbeitungszeiten unterschiedlicher Projekte.
Der jeweils erste Tag eines Monats kann in Spalte A ausgewählt werden. Die bei Anwahl des 01.02.2009 in Zelle A5 angezeigte Zirkelbezugswar...
06.01.2009 14:21:00
Thread-ID: 1037240
13 Beiträge
Wo liegt der Fehler im Code..?
Kathi

Halli Hallo...
Ich bins schon wieder mit einem weiteren problem:
Ich nutze den AutoFilter mit einer Passwortabfrage kombiniert.
...
ElseIf txtOK.Text = p And txtPass.Text = q Then
frmStart.Hide
For I = 3 To 19
ThisWorkbook.Sheets(I).Visible = True
ThisWorkbook.Sh...
08.01.2009 12:29:00
Thread-ID: 1037862
3 Beiträge
Fehler bei Funktion KALENDERWOCHE
Steffen

Hallo zusammen,
habe folgendes Probleme mit der Arbeitsblattfunktion KALENDERWOCHE: Trage ich in einer Zelle das Datum 23.05.10 ein und verlange in einer anderen Zelle (KALENDERWOCHE;C8;2) so sollte er eiegentlich 20 anzeigen da die Woche durch "2" am Montag beginnt und Sonntag der 23.05.20...
21.01.2009 12:05:06
Thread-ID: 1042118
2 Beiträge
Fehler bei Funktion KALENDERWOCHE
Steffen

Hallo zusammen,
habe folgendes Probleme mit der Arbeitsblattfunktion KALENDERWOCHE: Trage ich in einer Zelle das Datum 23.05.10 ein und verlange in einer anderen Zelle (KALENDERWOCHE;C8;2) so sollte er eiegentlich 20 anzeigen da die Woche durch "2" am Montag beginnt und Sonntag der 23.05.20...
21.01.2009 12:05:14
Thread-ID: 1042119
3 Beiträge
Wo liegt der fehler in diesem Makro ?Excel to PPT
sven

hallo ;)
ich habe hier ein Makro und finde den Fehler nicht.
ich hab in excel im sheet "Start" ein makro zugewiesen.
Dieses soll mir verschiedene Bereiche nacheinander in eine ppt Datei "demo.ppt"kopieren.
wenn ich das Makro ausführe kommt dauernd ne Fehlermeldung...also Powerpo...
17.02.2009 16:37:00
Thread-ID: 1051559
2 Beiträge
Wo liegt der fehler in diesem Makro ?Excel to PPT
sven

hallo ;)
ich habe hier ein Makro und finde den Fehler nicht.
ich hab in excel im sheet "Start" ein makro zugewiesen.
Dieses soll mir verschiedene Bereiche nacheinander in eine ppt Datei "demo.ppt"kopieren.
wenn ich das Makro ausführe kommt dauernd ne Fehlermeldung...also Powerpo...
17.02.2009 16:38:00
Thread-ID: 1051560
4 Beiträge
wo ist der fehler?
Hirschi

Sub mal4() Dim a As Integer For a = 1 To 100 If Cells(a, 1).Caption "" And Cells(a, 1).Caption Mod Cells(a, 2).Caption = 0 Then Cells(a, 3).Caption = CLng(Cells(a, 2)) / 5 * 4 Else Cells(a, 3).Caption = "" End If Next End Sub
Vielen Dank für eure Hilfe! Gruss Hirschi
27.03.2009 12:46:02
Thread-ID: 1064581
9 Beiträge
wo ist der fehler?
Emil

Hallo zusammmen
könnt ihr mir sagen wo hier der Fehler ist?
=WENN(L12="";RANG(C12;C$12:"C"$&Zeile(11+C9));"")
C$12:"C"$&Zeile(11+C9) darf man einen Bereich so formulieren?
in diesem falle müsste das dann geben den Bereich C12:C20
Gruss Emil
06.04.2009 15:14:56
Thread-ID: 1067119
6 Beiträge
wo ist der fehler?
Michel

Hallo
=SUMMENPRODUKT((A1:A1000)="Neue Formatdaten)"*((D1:D1000)="ZugriffLevel0"))
Vielen Dank für eure Hilfe!
Gruss Michel
08.05.2009 14:05:10
Thread-ID: 1073889
4 Beiträge
Anzeige
wo ist der Fehler?
Reto

Hallo zusammen
bekomme mit dieser Formel nur die Fehlermeldung #Wert..
=SUMMENPRODUKT((JAHR('einmalige Bestellungen'!D2:D5000)=Gesamtübersicht!A6)*1)
in D2:D5000 stehen Daten, in A6 ist 2004
wieso geht das nicht?
Vielen Dank für eure Hilfe!
Gruss Reto
15.05.2009 14:03:32
Thread-ID: 1075467
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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