Thema Datum  Von Nutzer Rating
Antwort
06.02.2024 11:48:03 MarcS
NotSolved
23.04.2024 10:14:01 Ben
NotSolved
Rot Vorzeichen ändern
 23.04.2024 22:33:07 Nobody
NotSolved
24.04.2024 18:33:31 Nobody
NotSolved
24.04.2024 10:02:35 Mase
NotSolved

Ansicht des Beitrags:
Von:
Nobody		 Datum:
23.04.2024 22:33:07		 Views:
41		 Rating:
     
Antwort:
  Ja
Thema:
Vorzeichen ändern

Hallo

ich habe deinen Code verkürzt, man kann auf Sheet.Select verzichten. Das ist viel eleganter. Ein - Zeichen davorsetzen geht aber nur mit einer For Next Schleife. Es sei denn die Kollegen kennen einen einfacheren Weg dafür. Könnte sein? So klappte es bei mir im Test.

Sub Test2()
Dim AC As Range, LastZell As Long
            LastZell = ActiveSheet.UsedRange.Rows.Count
            Range("G2:G" & LastZell).Copy
            Worksheets("Messmittel").Range("G7").PasteSpecial Paste:=xlPasteValues
            Application.CutCopyMode = False 'Copy Mode auschalten!
            For Each AC In Worksheets("Messmittel").Range("G7:G" & LastZell - 2)
                AC.Value = "-" & AC.Value
            Next AC
End Sub

mfg Nobody

 

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
06.02.2024 11:48:03 MarcS
NotSolved
23.04.2024 10:14:01 Ben
NotSolved
Rot Vorzeichen ändern
 23.04.2024 22:33:07 Nobody
NotSolved
24.04.2024 18:33:31 Nobody
NotSolved
24.04.2024 10:02:35 Mase
NotSolved