Results 1 to 13 of 13
Thread: *.doc
Hybrid View
-
9th March 2007 11:01 #1
-
9th March 2007 11:08 #2
-
9th March 2007 11:15 #3
-
22nd November 2008 23:23 #4Registered User
Join Date: Nov:2008
Location: Sept
Posts: 5
-
13th September 2007 17:07 #5
-
13th September 2007 17:18 #6
Office XP/2003: Tools -> Fix Broken Text, 2000: Word 2000 Fix: Font Repair Macro. -: http://www.microsoft.com/downloads/d...displaylang=RU, .
: Tools -> Options -> Save -> Embed True Type Fonts.
-
13th September 2007 17:56 #7
peshop, , ...
, .
Originally Posted by Microsoft
ONLINE... - ... ?''? * *
- !
...
-
13th September 2007 19:02 #8
'eefonts.dot' (, 'eefonts.exe' Word 2000) , 2007. . 2003 Tools -> Macros -> Security, 2007 ( ).
Alt+F11, Insert -> Module, :
Alt+F8 Run.Code:Sub convert() ' : 'http://www.microsoft.com/Rus/Msdn/Activ/MSVB/Archive/VBA/Decoder/VBVariables1_2.mspx a$ = Selection.Text RegionTo% = &H419 For i% = 1 To Len(a$) k1% = AscW(Mid(a$, i, 1)) k2% = k1% \ &H100 Select Case k2% Case 4 RegionFrom% = &H419 Case 1 RegionFrom% = &H415 Case 0 RegionFrom% = &H409 Case Esle Stop End Select a1$ = StrConv(ChrW(k1%), vbFromUnicode, RegionFrom%) Mid$(a$, i, 1) = StrConv(a1$, vbUnicode, RegionTo%) Next i Selection.Text = a$ End Sub
, .
, . .
-
14th September 2007 11:40 #9
-
22nd November 2008 23:25 #10
.docx
-
22nd November 2008 23:27 #11
-
22nd November 2008 23:29 #12
-
22nd November 2008 23:36 #13Registered User
Join Date: Nov:2008
Location: Sept
Posts: 5
,





Reply With Quote


...
7th May 2023, 14:24 in