Hogyan használhatjuk a Mentés másként funkciót az Excel meglévő fájljának automatikus felülírásához?
Amikor egy Excel-munkafüzetet új mappába ment, kap egy felszólító mezőt, az alábbi képernyőképen látható módon, ha létezik azonos nevű munkafüzet, amely a mappában található. Hogyan lehet a meglévő fájlt automatikusan felülírni azonnali figyelmeztető üzenet nélkül? Ebben a cikkben szereplő módszer segíthet.
Mentés funkcióként a meglévő fájl automatikus felülírása VBA kóddal
Mentés funkcióként a meglévő fájl automatikus felülírása VBA kóddal
Ha új névvel szeretne menteni egy munkafüzetet, és automatikusan felülírja a meglévő fájlt az Excel programban. Kérjük, tegye a következőket.
1. Először kérjük, hozzon létre egy Parancs gombot a Mentés másként funkció elindításához a munkalapon. kérem kattintson Fejlesztő > betétlap > Parancs gomb (Active X vezérlés). Lásd a képernyőképet:
2. Rajzoljon egy Parancsgombot a munkalapjára. Ezután kattintson a jobb gombbal, és válassza ki Kód megtekintése a helyi menüből.
3. Ban,-ben Microsoft Visual Basic for Applications ablakba, kérjük, másolja az alábbi VBA kódot, és illessze be a Privát részleg és a End Sub sorok a Kód ablak.
VBA kód: Mentés funkcióként a meglévő fájl automatikus felülírásához
Dim xFileName As String
Application.DisplayAlerts = False
If Right(ActiveWorkbook.Name, 4) = "xlsm" Then
xFileName = Application.GetSaveAsFilename(ActiveWorkbook.Name, "Excel Macro-Enabled Workbook (*.xlsm),*.xlsm")
Else
xFileName = Application.GetSaveAsFilename(ActiveWorkbook.Name, "Excel Workbook (*.xlsx),*.xlsx")
End If
If (xFileName <> "") Or (xFileName <> "False") Then
ActiveWorkbook.SaveAs Filename:=xFileName
End If
Application.DisplayAlerts = True
4. megnyomni a más + Q gombokkal lépjen ki a Microsoft Visual Basic for Applications ablak. És kapcsolja ki a Tervezési mód alatt a Fejlesztő Tab.
5. Kattintson a Parancs gombra, majd a Mentés másként megjelenik a párbeszédpanel, válassza ki a mappát a munkafüzet mentéséhez, majd kattintson a gombra Megtakarítás gombot.
Ha ugyanaz a név létezik, a munkafüzet létezik a célmappában, akkor a program automatikusan felülírja az aktuális munkafüzettel.
Kapcsolódó cikkek:
- Hogyan menthetünk egy munkalapot PDF fájlként és e-mailben csatolmányként az Outlook segítségével?
- Hogyan mentse az Excel fájlnevet időbélyeggel?
- Hogyan mentse el, exportálja több / az összes lapot különálló csv- vagy szövegfájlok elkülönítésére az Excel-ben?
- Hogyan lehet letiltani vagy nem engedélyezni a Mentés és mentés másként opciókat az Excelben?
- Hogyan tilthatja le a munkafüzet mentését, de csak az Excelben engedélyezett mentést engedélyezheti?
A legjobb irodai hatékonyságnövelő eszközök
Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz. Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...
Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját
- Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
- Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
- 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!