Thema Datum  Von Nutzer Rating
Antwort
20.12.2020 10:48:06 Gast78858
Solved
20.12.2020 11:34:49 Gast12196
NotSolved
Rot Status Auswertung nach Datumsbereich
 20.12.2020 11:39:10 Gast70043
NotSolved
20.12.2020 12:29:33 Gast56807
NotSolved
20.12.2020 12:35:12 Gast14325
NotSolved

Ansicht des Beitrags:
Von:
Gast70043		 Datum:
20.12.2020 11:39:10		 Views:
526		 Rating:
     
Antwort:
  Ja
Thema:
Status Auswertung nach Datumsbereich

Dein Problem ist sicherlich leicht lösbar, wenn du mit verständlichen Worten verraten würdest, was du eigentlich willst, und nicht den potenziellen Helfern zumutest, aus ja offenbar ungeeeigneten Makroschnipseln diese Absicht abzuleiten. Sieh jeweils in die VBA-Hilfe.

Ich nehme mal an:
Status ist immer angegeben und steht in Spalte st ab der Zeile p.
Projektstart steht in Spalte s.
Projektende steht in Spalte e.
Der zu addierende Wert steht in Spalte w.
Das Ergebnis soll in einer Messagebox ausgegeben werden.

sub auswertung
'Zahlenwerte, die du bei der Programmierung eingeben musst
p=...'Erste Zeilenummer der Werte
st = ...'Spaltennummer Status
s= ... 'Spaltennummer Projektstart
e=... 'Spaltennummer Projektende
w=... 'Spaltennummer Summandenbeginn=Inputbox("Beginn Auswwertungszeitraum)

ende =Inputbox("Ende Auswwertungszeitraum)
a=0
for i=p to Cells(Rows.Count, st).End(xlUp).Row
if cells(i,s)>=beginn and cells(i,e)<= ende a=a+w
next
msgbox a

end sub

 

 

 

 

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
20.12.2020 10:48:06 Gast78858
Solved
20.12.2020 11:34:49 Gast12196
NotSolved
Rot Status Auswertung nach Datumsbereich
 20.12.2020 11:39:10 Gast70043
NotSolved
20.12.2020 12:29:33 Gast56807
NotSolved
20.12.2020 12:35:12 Gast14325
NotSolved