Thema Datum  Von Nutzer Rating
Antwort
Rot Makro anpassen
23.05.2014 15:45:54 Oliver
NotSolved

Ansicht des Beitrags:
Von:
Oliver
Datum:
23.05.2014 15:45:54
Views:
587
Rating: Antwort:
  Ja
Thema:
Makro anpassen

Hallo zusammen,

 

ich bin nicht besonders bewandert im VBA und habe mir versucht ein Makro aufzunehmen und es dann auf einem aktivX Steuerelement zu legen.

 

Soweit so gut. Es hat geklappt, allerdings drei Probleme:

1. Wenn ich das Steuerelement in ein anderes Blatt verlege dann muss ich mit Active arbeiten...kann mir da jemand sagen was ich am Code änder muss?

2. Er soll eine CSV mit Semikolon als Trennzeichen speichern...macht er nur mit Komma...auch wenn ich Local:=true benutze. Jemand eine Idee?

3. Er soll die definierten Spalten formatieren, so... Doch da bekomme ich den Fehler das er das nicht selectieren kann.

Range("B:B,D:D,F:F,G:G,H:H,K:K").Select
    

 

Sub CSVsave()
'
' CSVsave Makro
'

'
    Range("A2:O2").Select
    Selection.AutoFill Destination:=Range("A2:O37000"), Type:=xlFillDefault
    Range("A2:O37000").Select
    Columns("A:O").Select
    Range("O1").Activate
    Selection.Copy
    Workbooks.Add
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Range("B:B,D:D,F:F,G:G,H:H,K:K").Select
    Range("K1").Activate
    Application.CutCopyMode = False
    Selection.NumberFormat = "0.00"
    Range("A1").Select
    ChDir "A:\"
    ActiveWorkbook.SaveAs Filename:= _
        "A:\AS Update2.csv", FileFormat:=xlCSV, Local:=True, _
    CreateBackup:=False
    ActiveWorkbook.Save
    ActiveWindow.Close
End Sub

Ich danke euch schon mal im Vorraus!


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst genau und ausführlich
  • 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
  • Bitte markieren Sie Ihre Anfrage als erledigt wenn Ihnen geholfen wurde
Thema: Name: Email:

 
 

Thema Datum  Von Nutzer Rating
Antwort
Rot Makro anpassen
23.05.2014 15:45:54 Oliver
NotSolved