Zum Inhalt springen

Honney86

Mitglieder
  • Gesamte Inhalte

    58
  • Benutzer seit

  • Letzter Besuch

Beiträge von Honney86

  1. Hallo Ihr,

    Ich versuche eine vorhandene datei unter einem anderen namen zu speichern und dann ohne formeln zu speichern.

    Private Function dateikopieren(Ausgangspfad As String, Datum As String) As Boolean
    
        Dim xlAnw As Object    ' Variable für Verweis deklarieren.
    
        Dim fName As String
    
        Dim bolReturn   As Boolean
    
    
        bolReturn = True
    
    
        Set xlAnw = CreateObject("excel.application")
    
    
        Set xlAnw = GetObject(Ausgangspfad & "\Vorlage.xls")
    
        'Anwendung wird gezeigt
    
        xlAnw.Application.Visible = True
    
        xlAnw.Parent.Windows(1).Visible = True
    
    
        fName = Ausgangspfad & "\Ergebnisse\Übersicht Sicherheitskennzeichen " & Datum & ".xls"
    
        xlAnw.SaveAs Filename:=fName
    
        xlAnw.Application.Save
    
        xlAnw.Application.Quit
    
    
        Set xlAnw = GetObject(Ausgangspfad & "\Ergebnisse\Übersicht Sicherheitskennzeichen " & Datum & ".xls")
    
        'Anwendung wird gezeigt
    
        xlAnw.Application.Visible = True
    
        xlAnw.Parent.Windows(1).Visible = True
    
        xlAnw.Application.Run "FormelnWeg"
    
        xlAnw.Windows(Ausgangspfad & "\Ergebnisse\Übersicht Sicherheitskennzeichen " & Datum & ".xls").Close SaveChanges:=True
    
        xlAnw.Application.Quit
    
    
        Set xlAnw = Nothing
    
    
    Exit_dateikopieren:
    
        dateikopieren = bolReturn
    
        Exit Function
    
    Err_dateikopieren:
    
      bolReturn = False
    
      Resume Exit_dateikopieren
    
    End Function

    Das Makro "FormelnWeg" funktioniert super, hab es im Excel manuell angestoßen...

    LG

  2. Sorry, dasss ich so lang nicht hier wa, aber hier brennt die hütte...

    trotzdem brauch ich mal eure hilfe... ich muss heut nachmittag nämlich zur gf

    wir sollen bei uns in der Firma unsere Verträge erst bekommen, wenn wir von der Prüfung zurückkommen und bestanden haben.

    Wir war/ist das bei euch so?

    Hattet/Habt ihr vorher schon einen Vertrag in der Tasche, oder ist das so der normale Ablauf?

    Bitte um ganz viele schnelle Antworten brauche diese Info!!

  3. Hallo,

    wir sollen bei uns in der Firma unsere Verträge erst bekommen, wenn wir von der Prüfung zurückkommen und bestanden haben.

    Wir war/ist das bei euch so?

    Hattet/Habt ihr vorher schon einen Vertrag in der Tasche, oder ist das so der normale Ablauf?

    Bitte um ganz viele schnelle Antworten brauche diese Info heut nachmittag unbedingt für ein Gespräch!

    MFG

  4. Moin Moin...

    Irgendwie gehts mir seit Montag dreckig :(

    Gibt es sowas wie eine vereinsamngskrankheit? wenn man den ganzen tag ohne menschenkontakt lebt? (mittagspause jetzt mal außenvor)

    *am frühstück bedien*

    @pinnie

    überraschungsreise? Warum? wer? wieso? ich will auch!!

    *in kuschelecke schmeiß und hoff, dass jemand vorbei kommt*

  5. Doof ists nur, wenn man irgendwas von der entsprechenden Person will... aber da ruf ich dann normal einfach an oder geh vorbei und frage nach.

    Doof nur, wenn man kein telefon hat und die Leute nicht kennt...

    noch blöder, wenn die leute sagen, dass sie dir die mail im laufe der woche beantworten...

    Ich will auch ardingsen.. ist das so schwer?

Fachinformatiker.de, 2024 by SE Internet Services

fidelogo_small.png

Schicke uns eine Nachricht!

Fachinformatiker.de ist die größte IT-Community
rund um Ausbildung, Job, Weiterbildung für IT-Fachkräfte.

Fachinformatiker.de App

Download on the App Store
Get it on Google Play

Kontakt

Hier werben?
Oder sende eine E-Mail an

Social media u. feeds

Jobboard für Fachinformatiker und IT-Fachkräfte

×
×
  • Neu erstellen...