MS Office 21 proplus key Sichern.

[EynMarc]

Eyne Frage
Wie kann ich den key und aktivierung sichern das ich bei einer neuen Win 11/12 den Aktiviert ist und kein abfrage mehr kommt, und Anrufen nervt.
Gab mal früher ein tool dafür läuft aber nicht mehr.

Hab jetzt eim Image vom C: da ist office natürlich aktiviert.
Aber vileicht will ich ja auch mal wider ne Frische Installation oder wenn beta/alpha Win 12 kommt ganz neu anfangen. 😉

[Tante Google]

[Holgi]

Habe gerade keine MS Office ProPlus am Laufen.
Schau mal, ob es so geht:
To back up Office 2016 activation on Windows 10/8, just go to C:\Windows\System32\spp, and then copy and paste the store folder into a safe place.
Hier gesehen:
https://www.isumsoft.com/office/backup- ... ation.html
Möglicherweise bei Office 2021 ProPlus identisch.

[EynMarc]

Danke ich schaue mal. 😉

[Holgi]

habs gerade mal ausprobiert.
Funktioniert.
Man muss den Ordner C:\Windows\System32\spp\Store (bzw. die darin enthaltenen 3 Dateien) sichern.
Beim zurücksichern muss ggf. der Click2Run Dienst mit

Code: Alles auswählen

net stop ClickToRunSvc

gestoppt werden. Dann den Ordner (die Dateien) zurückkopieren und Windows einmal neu starten. Das war´s auch schon.

[Holgi]

hier mal die Scripte für eine automatisches Backup/Rücksicherung.
Wäre schön, wenn das mal jemand bei sich testen könnte. Bei mir hat es funktioniert. Aber Office ist nicht gleich Office:
Office 2016, 2019, 2021 und dann noch Retail, Volume etc. etc.

Backup Office Aktivierung.cmd

Code: Alles auswählen

@Echo off

:Admin
cls

:: BatchGotAdmin
:-------------------------------------
REM  --> Check for permissions
    IF "%PROCESSOR_ARCHITECTURE%" EQU "amd64" (
>nul 2>&1 "%SYSTEMROOT%\SysWOW64\cacls.exe" "%SYSTEMROOT%\SysWOW64\config\system"
) ELSE (
>nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system"
)

REM --> If error flag set, we do not have admin.
if '%errorlevel%' NEQ '0' (
    echo Requesting administrative privileges...
    goto UACPrompt
) else ( goto gotAdmin )

:UACPrompt
    echo Set UAC = CreateObject^("Shell.Application"^) > "%temp%\getadmin.vbs"
    set params= %*
    echo UAC.ShellExecute "cmd.exe", "/c ""%~s0"" %params:"=""%", "", "runas", 1 >> "%temp%\getadmin.vbs"

    "%temp%\getadmin.vbs"
    del "%temp%\getadmin.vbs"

    exit /B

:gotAdmin
    pushd "%CD%"
    CD /D "%~dp0"
chcp 1252 >nul
Echo die Office Aktivierungsdateien werden jetzt gesichert
Echo.
net stop ClickToRunSvc
timeout /t 3 >nul
xcopy "%windir%\System32\spp\Store" "%~dp0\Store" /h /g /i /e /k /y
cls
Echo die Aktivierungsdateien wurden gesichert
net start ClickToRunSvc
pause

Restore Office Aktivierung.cmd

Code: Alles auswählen

@Echo off

:Admin
cls

:: BatchGotAdmin
:-------------------------------------
REM  --> Check for permissions
    IF "%PROCESSOR_ARCHITECTURE%" EQU "amd64" (
>nul 2>&1 "%SYSTEMROOT%\SysWOW64\cacls.exe" "%SYSTEMROOT%\SysWOW64\config\system"
) ELSE (
>nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system"
)

REM --> If error flag set, we do not have admin.
if '%errorlevel%' NEQ '0' (
    echo Requesting administrative privileges...
    goto UACPrompt
) else ( goto gotAdmin )

:UACPrompt
    echo Set UAC = CreateObject^("Shell.Application"^) > "%temp%\getadmin.vbs"
    set params= %*
    echo UAC.ShellExecute "cmd.exe", "/c ""%~s0"" %params:"=""%", "", "runas", 1 >> "%temp%\getadmin.vbs"

    "%temp%\getadmin.vbs"
    del "%temp%\getadmin.vbs"

    exit /B

:gotAdmin
    pushd "%CD%"
    CD /D "%~dp0"
chcp 1252 >nul 
Echo die Office Aktivierungsdateien werden jetzt zurückgeschrieben
Echo.
net stop ClickToRunSvc 
timeout /t 3 >nul
xcopy "%~dp0\Store" "%windir%\System32\spp\Store" /h /g /i /e /k /y
Echo Windows muss jetzt einmal neu gestartet werden
Echo Neustart durch Tastendruck!!
pause >nul
shutdown -r -f -t 0

[Holgi]

oder mal hier schauen:
https://forums.mydigitallife.net/search ... ion&o=date

[Weiss der Geier]

Hallochen,

Hab die Skripte ausprobiert und sie funktionierten!

schönen Abend noch

[Holgi]

Hab die Skripte ausprobiert und sie funktionierten!

danke fürs Testen! Freut mich.