Thema Datum  Von Nutzer Rating
Antwort
10.12.2022 12:11:12 Marc.L
NotSolved
Blau Msgbox in For Schleife
10.12.2022 13:15:02 Flotter Feger
NotSolved
11.12.2022 17:37:15 Marc.L
NotSolved
11.12.2022 17:51:59 Marc.L
NotSolved
11.12.2022 18:26:46 Flotter Feger
NotSolved
11.12.2022 19:51:12 Marc.L
NotSolved
11.12.2022 20:19:31 Gast61337
NotSolved

Ansicht des Beitrags:
Von:
Flotter Feger
Datum:
10.12.2022 13:15:02
Views:
186
Rating: Antwort:
  Ja
Thema:
Msgbox in For Schleife

Hallo,

nur ein Vorschlag, um dir die Logik der Prüfung zu zeigen ...

                            'Farbe in Zelle in Tabelle suchen
                            Dim bool1 As Boolean
                            bool1 = False
                            If Material = Worksheets("Material").Cells(1 + j, 2) Then
                                    'Farbe setzen in ING_Eplan_Export
                                wks.Cells(1 + i, 2) = Worksheets("Material").Cells(1 + j, 1)
                                bool1 = True
                            End If
                            
                            '...
                            'Querschnitt in Zelle in Tabelle suchen
                            Dim bool2 As Boolean
                            bool2 = False
                            If Farbe = Worksheets("Material").Cells(1 + k, 5) Then
                                   'Querschnitt setzen in ING_Eplan_Export
                                wks.Cells(1 + i, 1) = Worksheets("Material").Cells(1 + k, 4)
                                bool2 = True
                            End If

                            If bool1 = False Or bool2 = False Then MsgBox "Querschnitt oder Farbe fehlen!" & " " & Material

Sabina


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
10.12.2022 12:11:12 Marc.L
NotSolved
Blau Msgbox in For Schleife
10.12.2022 13:15:02 Flotter Feger
NotSolved
11.12.2022 17:37:15 Marc.L
NotSolved
11.12.2022 17:51:59 Marc.L
NotSolved
11.12.2022 18:26:46 Flotter Feger
NotSolved
11.12.2022 19:51:12 Marc.L
NotSolved
11.12.2022 20:19:31 Gast61337
NotSolved