Thema Datum  Von Nutzer Rating
Antwort
Rot Auswertung via Makro
 18.12.2020 20:36:52 Gast5635
Solved
20.12.2020 11:38:03 Gast13127
NotSolved

Ansicht des Beitrags:
Von:
Gast5635		 Datum:
18.12.2020 20:36:52		 Views:
1264		 Rating:
     
Antwort:
 Nein
Thema:
Auswertung via Makro

Hallo zusammen,

ich wäre euch sehr dankbar wenn ihr mir helfen könntet und zwar habe eine Excel Datei bei der ich je nach Zeitraum eine Auswertung via Makro vornehmen will.

Dabei soll stets nach einem Zeitraum gefiltert werden könnnen (ein von bis Datum). Dementsprechend werden dann nur Projekte ausgewertet, deren Angebot in diesem Zeitraum versendet wurde (Spalte Angebot versendet und Spalte Projektende). Habt ihr eine Idee wie ich das via Makro gut lösen könnte? Anbei mein Code Entwurf und ein Bild der Tabelle die ausgewerten werden soll. Vorab vielen Dank für eure Hilfe und schöne Grüße.

 

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
Sub Auswertung()
 
 
Application.ScreenUpdating = False
 
 
Sheets("Industrie Auswertung").Activate
 
 
 ActiveSheet.Range("D3").Select
 
 
    ActiveCell.FormulaR1C1 = _
        "=SUMIFS(Tab_Industrie[PT],Tab_Industrie[Status], 'Industrie Auswertung'!R[309]C[-3]," & _
        "Tab_Industrie[Angebot versendet],R3C2)"
     
     
 ActiveSheet.Range("E3").Select
     
     
     ActiveCell.FormulaR1C1 = _
        "=SUMIFS(Tab_Industrie[PT],Tab_Industrie[Status], 'Industrie Auswertung'!R[310]C[-4]," & _
        "Tab_Industrie[Angebot versendet],R3C2)"
         
         
 ActiveSheet.Range("F3").Select
         
         
    ActiveCell.FormulaR1C1 = _
        "=SUMIFS(Tab_Industrie[PT],Tab_Industrie[Status], 'Industrie Auswertung'!R[311]C[-5]," & _
        "Tab_Industrie[Angebot versendet],R3C2)"
     
     
ActiveSheet.Range("D3:F3").Value = ActiveSheet.Range("D3:F3").Value
     
     
    Cells(1, 1).Select
     
     
    Application.ScreenUpdating = True
     
     
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:
WYSIWYG-Editor, ctl00_Content_editor1



  • 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
Rot Auswertung via Makro
 18.12.2020 20:36:52 Gast5635
Solved
20.12.2020 11:38:03 Gast13127
NotSolved