Mitzählen wenn Zugriff

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Mitzählen wenn Zugriff

18.10.2005 10:37:45

Heiko S.

AW: Mitzählen wenn Zugriff

18.10.2005 13:51:36

Gerhard

Noch offen !!!

18.10.2005 16:19:14

Heiko S.

AW: Noch offen !!!

18.10.2005 18:13:35

Grhard

Nachfrage

19.10.2005 07:56:24

Heiko S.

AW: auf Nachfrage

20.10.2005 09:33:41

Gerhard

AW: Beispieldatei

21.10.2005 10:44:18

Gerahrd

AW: Beispieldatei

21.10.2005 12:03:32

Heiko S.

Neue Version:

21.10.2005 13:58:43

Heiko S.

AW: Neue Version:

21.10.2005 14:35:35

Gerhard

AW: Neue Version:

21.10.2005 14:50:16

Heiko S.

AW: Neue Version:

21.10.2005 15:54:53

Gerhard

Moin Gerhard,
noch Interesse an einer Antwort ?
Dann mußt du mir mal mehr Info geben, da, meines Wissens, ein Zugriff über Verknüpfung auf deine Bestand.xls nicht festgestellt werden hätte ich da ne Idee das über die Verrechnung.xls zu machen.
Aber dazu müßte ich wissen wie die aussieht und wie du per Verknüpfung auf bis 1600 verschiedene Datensätze zugreifst. Am besten ne Beispieldatei.

Zum Umgang bei Herber.
Threads sind ca. 5 Tage im Forum.
Woher soll derjenige der den vom 17.10 anschaut sich Gedanken macht und dir ne Antwort ausarbeitet, Wissen das es einen neuen am 19.10 gibt zu dem sich dann auch noch Leute Gedanken machen. Er merkt es vielleicht daran das er auf seine Antwort zum 17.10 keine Rückmeldung bekommt. Da du ja nur noch auf den 19.10 guckst.
Dann hast du vieleicht ne Antwort aber mehr Leute beschäftigt als nötig und andere Frager bleiben dann ohne Antwort weil du "alle Resourcen" bindest.
(Ist jetzt alles eine bisschen übertrieben geschrieben aber ich denke du weißt was ich meine.)
Ansonsten sind wir hier ziemlich hilfsbereit und schnell, was du vielleicht in Zukunft noch feststellen wirst. Und wenn du mal keine Antwort bekommst, liegt es vielleicht an einer schlechten Problembeschreibung, die dann mal neu zu machen ist keine schlechte Idee, aber dann halt die alte schleßen. (Selbst ne Antwort schrieben und im Kopf "Geschlossen" angeben. Am besten noch nen Link zum neuen Thread mit rein).
Als letzter Tipp noch mal oben auf "Forums-Seiten" und dann FAQ da steht auch noch was zum Umgang bei Herber.
Gruß Heiko

PS: Rückmeldung wäre nett !

Hallo Gerhard,
nun noch ne neue Version, reagiert wieder auf Eingaben in Spalte O (NR) aber diese Version sollte auch was im Gesamtbestand finden wenn die Ident.Nr nicht so schön sortiert ist wie in deinem Beispiel.


Private Sub Worksheet_Change(ByVal Target As Range)
Dim lngRow As Long, lngRowAlt As Long
' Rasu hier wenn mehr als eine Zelle geändert wird
If Target.Count > 1 Then Exit Sub
' raus hier wenn nicht Spalte O geändert wird.
If Target.Column <> 15 Then Exit Sub
' Wenn in Spalte N nichts drin steht raus hier.
If Target.Offset(0, -1).Value = "" Then
MsgBox "Sie haben vergessen die Ident. Nummer einzutragen !", vbCritical, " Ident. Nr. vergessen !"
Exit Sub
End If
On Error Resume Next
'Suchen nach der Zeile im Gesamtbestand
lngRow = Sheets("Gesamtbestand").Range("G:G").Find(What:=Target.Offset(0, -1).Value, LookIn:=xlFormulas, _
LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False).Row
If lngRow < 1 Then Exit Sub
Do
' Wenn was gefunden wurde dann in Spalte Q gucken ob Q drin, wenn ja dann R eins runter.
If lngRow > 1 Then
lngRowAlt = lngRow
If Sheets("Gesamtbestand").Range("H" & lngRow) = Target.Value Then
If Sheets("Gesamtbestand").Cells(lngRow, 17).Value = "Q" Then
Sheets("Gesamtbestand").Cells(lngRow, 18).Value = Sheets("Gesamtbestand").Cells(lngRow, 18).Value - 1
End If
Exit Sub
End If
lngRow = Sheets("Gesamtbestand").Range("G:G").FindNext(Range("G" & lngRow)).Row
End If
Loop While lngRow > lngRowAlt
On Error GoTo 0
MsgBox "Die IDENT.NR  " & Target.Offset(0, -1).Value & "  in Kombination mit der NR  " & _
Target.Text & "  ist nicht im Gesamtbestand vorhanden!", vbCritical
End Sub

Gruß Heiko

PS: Rückmeldung wäre wäre bei dem Tipp wohl angemessen !!!

Beliebteste Forumthreads (12 Monate)

12 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

12
Beiträge zum Forumthread

Beiträge zu diesem Forumthread