Thema Datum  Von Nutzer Rating
Antwort
Rot Ausdruck erf. bei kopiertem Code
 16.02.2023 18:12:06 Tim
NotSolved
16.02.2023 18:18:52 Gast85538
NotSolved
16.02.2023 18:19:16 Gast62021
NotSolved

Ansicht des Beitrags:
Von:
Tim		 Datum:
16.02.2023 18:12:06		 Views:
707		 Rating:
     
Antwort:
  Ja
Thema:
Ausdruck erf. bei kopiertem Code

Hey,  Ich habe einen funktionierenden VBA Code von einer Excel in eine andere kopiert (natürlich den Makronamen angepasst)

allerdings bringt er mir jetzt (bei roter Schrift)    Ausdruck erforderlich.   Kann mir hier jemand sagen, wie ich das Problem löse ?

 

also hier der Anfang vom Code:

 

 

If Range("H1") = 1 Then

  
 ActiveSheet.Shapes.Range(Array("Oval 3")).Select


     With Selection.ShapeRange.Fill
        .Visible = msoFalse
        .ForeColor.RGB = RGB(255, 0, 0)
        .Transparency = 0.8
        .Solid
   End With
  
    With Selection.ShapeRange.Line
        .Visible = msoTrue
        .Weight = 1.2
        .ForeColor.RGB = RGB(255, 0, 0)
    End With
   
    With Selection.ShapeRange.LockAspectRatio = msoTrue
    Selection.ShapeRange.Height = 14.1732283465
  
    End With

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
Rot Ausdruck erf. bei kopiertem Code
 16.02.2023 18:12:06 Tim
NotSolved
16.02.2023 18:18:52 Gast85538
NotSolved
16.02.2023 18:19:16 Gast62021
NotSolved