Wie speichert man eine Excel-Datei mit Zellenwert?
Wenn Sie eine Arbeitsmappe verwenden, haben Sie sich vielleicht schon einmal überlegt, die Excel-Datei basierend auf einem Zelleninhalt zu speichern. Zum Beispiel haben Sie „Verkaufspreis“ in Zelle A1 und möchten die Arbeitsmappe unter dem Namen Verkaufspreis speichern. Natürlich können Sie den Namen im Dialogfeld „Speichern unter“ eingeben und dann speichern. Aber das wäre eine ineffiziente Methode bei Ihrer Arbeitsmenge. Heute zeige ich Ihnen einen schnellen Trick, um dieses Problem zu lösen.
Excel-Datei mit bestimmtem Zellenwert mithilfe von VBA-Code speichern
Excel-Datei mit bestimmtem Zellenwert mithilfe von VBA-Code speichern
Der folgende VBA-Code kann Ihnen helfen, Ihre Arbeitsmappe mit einem bestimmten Zellenwert zu speichern. Bitte gehen Sie wie folgt vor:
1. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
2. Klicken Sie auf Einfügen > Modul und fügen Sie den folgenden Code in das Modulfenster ein.
VBA-Code: Excel-Datei mit bestimmtem Zellenwert speichern
Private Sub filename_cellvalue()
'Updateby Extendoffice
Dim Path As String
Dim filename As String
Path = "C:\Users\dt\Desktop\my information\"
filename = Range("A1")
ActiveWorkbook.SaveAs filename:=Path & filename & ".xls", FileFormat:=xlNormal
End Sub
3. Drücken Sie dann die Taste F5, um den Code auszuführen, und Ihre Arbeitsmappe wurde entsprechend dem Zelleninhalt der Zelle A1 benannt. Siehe Screenshot:
Hinweise:
1. Sie können jeden beliebigen Zellenwert als Dateinamen festlegen, indem Sie einfach A1 im obigen Code durch einen anderen Zellbezug ersetzen.
2. Ihre aktive Arbeitsmappe wird im Ordner C:\Users\dt\Desktop\my information\ gespeichert (der letzte Schrägstrich muss erhalten bleiben, wenn Sie Ihren Speicherort dafür einfügen). Sie können den Pfad nach Bedarf ändern.
Verwandte Artikel:
Wie speichert man eine Datei mit Datum und Uhrzeit in Excel?
Wie zeigt man den Dateipfad in der Titelleiste oder Symbolleiste in Excel an?
Beste Büroproduktivitätswerkzeuge
Verbessern Sie Ihre Excel-Fähigkeiten mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über300 erweiterte Funktionen zur Steigerung der Produktivität und Zeitersparnis. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...
Office Tab bringt eine Registerkartenoberfläche zu Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie die Bearbeitung und das Lesen mit Registerkarten in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters, anstatt in neuen Fenstern.
- Steigert Ihre Produktivität um50 % und reduziert täglich hunderte von Mausklicks für Sie!