TurboRS3
17.10.2018, 09:27
Vba adieren in verschiedenen spalten?

Hallo Zusammen,

ich möchte in einer Tabelle so eine Art Täglichen Abtrag der Stückzahl erstellen!

das ganze soll so aussehen:

in A1=Gesamtstückzahl, in B1 Gefertigte und in C1 Zähler in dem eine zahl eingetragen werden soll die sich dann gleich in B1 adiert und automatisch aus dem Feld wieder löscht.

hier ein Beispiel:

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address(0, 0) = "C1" Then

 On Error GoTo Err_Exit

 Application.EnableEvents = False

 Range("B1") = Range("B1") + Target

End If

Err_Exit:

Application.EnableEvents = True

End Sub

Das funktioniert leider nur in der ersten Zeile/Spalte. Es sollte in "C1" bis "C10" funktionieren.

Danke

 ...zum Beitrag
Antwort
von TurboRS3
17.10.2018, 11:21

Hi, Habe es selbst gelöst. Einfach kopiert und das End Sub raus genommen. So klappt das auch

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address(0, 0) = "F2" Then

 On Error GoTo Err_Exit

 Application.EnableEvents = False

 Range("E2") = Range("E2") + Target

  

End If

Err_Exit:

Application.EnableEvents = True

If Target.Address(0, 0) = "F3" Then

 On Error GoTo Err_Exit

 Application.EnableEvents = False

 Range("E3") = Range("E3") + Target

  

End If

Application.EnableEvents = True

If Target.Address(0, 0) = "F4" Then

 On Error GoTo Err_Exit

 Application.EnableEvents = False

 Range("E4") = Range("E4") + Target

  

End If

Application.EnableEvents = True

End Sub

 ...zur Antwort
TurboRS3
17.04.2018, 14:40
Automatische Mail bei abgelaufenem Datum?

Hallo zusammen,

Ich möchte in Excel 2010 meine Tabelle so programmieren das sobald ein Artikel abläuft, automatisch eine Email an mich gesendet wird.

Könnt ihr mir da Helfen ? Das wäre so

A3 steht die Artikelnummer

G3 Das Haltbarkeitsdatum

N3 Die Mail Adresse an die es gesendet werden muss.

Danke und Gruß

Michel

 ...zum Beitrag
Antwort
von TurboRS3
18.04.2018, 10:43

@IchMalWiederXY ich kann dir nicht antworten.

Das was du da geschrieben hast, funktioniert leider nicht :(

Gruß

Michel

 ...zur Antwort