Thema Datum  Von Nutzer Rating
Antwort
30.03.2010 09:46:28 Cewiethemaster
NotSolved
Blau Aw:Excel VBA Makro
 31.03.2010 00:41:51 sigma
NotSolved

Ansicht des Beitrags:
Von:
sigma		 Datum:
31.03.2010 00:41:51		 Views:
765		 Rating:
     
Antwort:
  Ja
Thema:
Aw:Excel VBA Makro
Cewiethemaster schrieb am 30.03.2010 09:46:28:

Hallo.

Bis jetz verwende ich folgendes Makro

Sub Blank_1()
'
' Blank_1 Makro
' Schreibt einen 1 in die Blankzeile
'
ActiveCell.FormulaR1C1 = "1"
Range("I13").Select
End Sub

Das Makro schreibt einen 1er in die Aktuelle Zelle...

Wie kann ich des so machen, dass das Makro beim Ausführer einen 1er an die anderen Zahlen in zelle G4 Schreibt?
das heisst, die anderen nicht ersetzen, sondern RECHTS davon eine 1 anhängen??

Hallo Cewiethemaster,

was meinst du mit anderen Zahlen in Zelle G4. Stehen in der Zelle mehrere Zahlen oder nur Eine? Folgendes Makro hängt aber eine 1 an eine einzelne Zahl in Zelle G4 an. Ich speichere einfach den Wert aus Zelle G4 in der Variable Wert und hänge die ans an und überschreibe die Zelle G4 mit neuem Wert.

Sub EinsAnhängen()

Dim Wert As Variant

Wert = Worksheets(1).Range("G4").Value
Wert = Wert & "1"
Worksheets(1).Range("G4").Value = Wert

End Sub

mfg sigma




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
30.03.2010 09:46:28 Cewiethemaster
NotSolved
Blau Aw:Excel VBA Makro
 31.03.2010 00:41:51 sigma
NotSolved