Excel öffnet Datei einfach nicht mehr

Hallo. Ich habe letzte Woche eine Excel-Datei geändert. Heute wollte ich sie öffnen, aber es kam der Text, der im Bild (siehe Anhang) steht. ich habe schon im Netz nach Möglichkeiten geschaut. Die eine Möglichkeit, über Excel die Datei zu öffnen und zu reparieren, ging nicht. (Bei Excel 2010 auf Datei -> Öffnen -> Datei anklicken -> neben der Schaltfläche "Öffnen" auf den Pfeil klicken und dann "Öffnen und reparieren" anklicken). Ich habe die Datei auf einem USB-Stick liegen. Ich habe nach dem Speichern auch noch andere Dokumente (Word, Excel) bearbeitet und gespeichert, die lassen sich problemlos öffnen. Nur diese eine nicht. Ich habe auch ordnungsgemäß auf "Hardware sicher entfernen" geklickt und den Stick erst dann herausgezogen. Aber irgendwie öffnet es die Datei jetzt auch nicht. Ich habe sie schon mir selbst per Mail geschickt in der Hoffnung, ich könnte sie bei Office Online öffnen (bin bei MS Outlook und man kann dort seine Dateien auch im Online Office anzeigen (also kostenloses Grund-Word, -Excel und -PowerPoint)). Das hat aber auch nicht geklappt, da sie auch dort nicht geöffnet werden konnte.

Wer kennt Hilfe. Die Datei ist wirklich wichtig. Ich habe auch von vielen ein Backup bzw. eine Kopie auf meiner Festplatte. Diese habe ich aber nur auf dem Stick gehabt. Wer kennt noch Tipps, wie ich die Datei wieder öffnen kann. Bitte schaut euch das Bild an, dieses Fenster kommt ständig hoch. Auch, wenn ich es bei meiner Mutter auf dem Rechner mit Office 2007 (ich habe 2010) öffnen will. Die Programme sind ja fast identisch und man kann so gut wie alles, was man auf 2010 speichert da auch öffnen.

BITTE HELFT MIR!!! ;)

Bild zum Beitrag
Computer, Windows, Office, Datei, Microsoft Excel, Windows 7, Technik, Programm
Email mit vba aus Excel + Text aus Word

Hallo zusammen,

ich bin gerade dabei VBA zu lernen und würde gerne testen, wie man mit Outlook automatisch Emails versenden kann. Hierzu habe ich entsprechende Empfänger (Adresese, Vorname, Nachname und Betreff) in Excel. Einen entsprechenden Email-Text (inkl. Absatz und Textformatierung) habe ich in Word vorliegen. Kann man das irgendwie kombinieren?

Ich habe im Netz bislang nur Lösungen gefunden, wie man Emails versenden kann, bei denen alles in Excel oder dem VBA vorliegt.

z.B. diese hier:

Sub Excel_Serial_Mail()
Dim MyOutApp As Object, MyMessage As Object
Dim i As Long
'Start der Sendeschleife an 10 Empfänger
For i = 1 To 10
    Set MyOutApp = CreateObject("Outlook.Application")
    Set MyMessage = MyOutApp.CreateItem(0)
    With MyMessage
        'Die Empfänger stehen in Spalte A ab Zeile 1
        .To = Cells(i, 1) 'E-Mail Adresse
        'Der Betreff in Spalte B
        .Subject = Cells(i, 2) '"Betreffzeil"
        'Der zu sendende Text in Spalte C
        'Maximal 1024 Zeichen
        'Der Text wird ohne Formatierung übernommen
        .Body = Cells(i, 3)
        'Hier wird die Mail angezeigt
        '.Display
        'Hier wird die Mail gleich in den Postausgang gelegt
        .Send
    End With
    'Objectvariablen leeren
    Set MyOutApp = Nothing 'CreateObject("Outlook.Application")
    Set MyMessage = Nothing 'MyOutApp.CreateItem(0)
    'Sendepause einschalten
    'Outlook kann die Aufträge nicht schnell genug verarbeiten
    Application.Wait (Now + TimeValue("0:00:05"))
Next i
End Sub
Microsoft Word, Microsoft Excel, E-Mail, VBA

Meistgelesene Beiträge zum Thema Microsoft Excel