Beiträge anzeigen

Diese Sektion erlaubt es dir alle Beiträge dieses Mitglieds zu sehen. Beachte, dass du nur solche Beiträge sehen kannst, zu denen du auch Zugriffsrechte hast.

Nachrichten - excel for life

Seiten: [1]

Excel / Excel stürzt beim schließen ab

« am: Oktober 08, 2013, 09:14:16 Vormittag »

Hallo Leute,
ich habe ein schweres Problem. Immer wenn ich mein Excel schließen möchte, stürzt Excel ab und will die Dateien wieder neu laden/wiederherstellen, die alle geschlossen worden sind.

Kann mir einer sagen, woran das liegt?
Habe eine ziehmlich lange Makro in einer Datei hier dazu der Code:
Vielleicht ist da ja was, was Excel nicht so gefält.

Bitte hilft mir, ich habe stunden gegoogelt aber nichts passendes gefunden -.-

Code: HTML

Dim Monat As String
Sub Jan_transferieren()
Monat = InputBox("Bitte geben Sie den Monat für den vorgesehenden Datentransfer an")
    ' Bedingung für welchen Monat die Daten kopiert werden sollen
'JANUAR
If Monat = "Januar" Then
    'Datei öffen
    Workbooks.Open Filename:= _
        "Y:\mp\FC\Update.xls" _
        , UpdateLinks:=0
    Sheets("Zusammenfassung").Select
    Range("C2").Select
    ActiveCell.FormulaR1C1 = ""
    Range("C2").Select
    ActiveCell.FormulaR1C1 = "FC G"
    Range("C3").Select
'ab hier kopieren!
    ActiveWindow.SmallScroll Down:=12
    Range("E22:H24").Select
    Selection.Copy
    Windows("Sicht_Makro.xls").Activate
    Sheets("FC_G").Select
    Range("B4").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
 
'nochmal die Maßnahmen-Datei aufrufen um diese zu "aktivieren" und danach zu schließen
    Windows("Update.xls").Activate
    'aktiviertes Fenster schließen
    ActiveWindow.Close
    Windows("Sicht_Makro.xls").Activate
    Sheets("Daten_trans.").Select
    Range("A2").Select
    Else
Call NDS_Feb_transferieren
End If
End Sub
 

Excel / Mit VBA zwei gegebende Filter verändern

« am: Oktober 02, 2013, 15:00:18 Nachmittag »

hey Leute,

habe ne dringende Frage und Google hat mir leider nicht weiter geholfen.

Ich muss mit einer Makro eine andere Datei öffen (Datei 2) und dann in der Datei2 in einer Tabelle, wo schon Filter eingesetzt sind, per DropandKlick die beiden Filter verändern, zb. war der Filter vorher bei Ziel 1 und soll jetzt aber Ziel 2 sein und der zweite Filter war vorher bei Monat Januar und soll jetzt Monat Feb. sein.

Wie bekomm das hin?!
Hier meine Makro:

Sub versuch I
Workbooks.Open Filename:= _
"Y:\Werkzeugkasten\Maßnahmen_Update.xls" _
, UpdateLinks:=0
Sheets("Maßnahmen").Select
ActiveSheet.Range("$6:$2599").AutoFilter Field:=1, Criteria1:="RC NDS"
ActiveSheet.Range("$6:$2599").AutoFilter Field:=6, Criteria1:="1"

end sub

Excel / gesperrte Zellen ausblenden

« am: September 24, 2013, 16:22:56 Nachmittag »

Guten Tag Community,

ich habe eine wichtige Frage und habe mich schon halb Tod gesucht im Internet, aber einfach nichts nützliches gefunden und ich bin wirklich nicht der dümmste...

Es geht darum, dass ich bestimmte Zellen gesperrt habe, da ich Formeln hinzugefügt habe, die andere Benutzer nicht ausversehen verändern sollen.

Jedoch habe ich auch bestimmte Spalten gruppiert und unter diesen Spalten sind jeweils gesperrte Zellen. Wenn ich nun das Blatt schützen möchte und so die Sperrung aktiviere, kann ich meine gebildeten Gruppen nicht mehr öffen bzw. schließen.

Meine Frage also:

Wie kann ich entweder gruppierte Spalten öffen/schließen, ohne dass der Benutzer jedes mal den Schutz auflösen muss (dann nützt der Schutz auch nichts mehr, da er irgendwann einfach ausgeschaltet bleibt)
Oder wie kann ich Zellen noch so schützen, sodass andere Benutzer gehindert/gewarnt werden, dass sie die Zellen verändern, aber man trotzdem die gruppierten Spalten öffen/schließen kann.

Freue mich für jede Anregung, da ich wirklich verzweifelt bin -.-

Liebe Grüße

Karsten

Seiten: [1]

Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<

Menü

An- und Abmelden

Partner / Links