µ±Ç°Î»ÖãºOfficeѧԺ - Office½Ì³Ì - WPS Office 2005³£¼ûÎÊÌâ½â´ð

WPS Office 2005³£¼ûÎÊÌâ½â´ð

¡¡¡¡wps office 2005µÄ°²×°°üÓжà´ó£¿ÄÜ·ñÂú×ã°ì¹«Ó¦Óã¿
¡¡¡¡´ð£ºwps office 2005µÄ°²×°°üΪ23M£¬wps office 2005°üº¬wpsÎÄ×Ö¡¢wps±í¸ñ¡¢wpsÑÝʾÈý´óÄ£¿é£¬ÍêÈ«Âú×ã°ì¹«Ó¦Óá£

¡¡¡¡¡¾Ñ¡Ïî¡¿¡ª¡¾´òÓ¡¡¿ÖеĴòÓ¡Òþ²ØÎÄ×ÖÓëÌ×´òÒþ²ØÎÄ×ÖÓкÎÇø±ð£¿
¡¡¡¡´ð£ºwps office 2005µÄwpsÎÄ×ÖÄ£¿éÖУ¬Ôڲ˵¥¡¾Ñ¡Ïî¡¿¡ª¡¾´òÓ¡¡¿ÖеĴòÓ¡Òþ²ØÎÄ×ֻὫÒþ²ØÎÄ×Ö°´ÕÕÕý³£ÎÄ×Ö´òÓ¡³öÀ´£¬¶øÌ×´òÒþ²ØÎÄ×ֻ᲻´òÓ¡Òþ²ØÎÄ×Ö£¬µ«½«ÆäËùÕ¼×Ö·ûµÄλÖÃÁô³öÀ´¡£

¡¡¡¡ÎÒµÄwordÎĵµÔÚwpsÎÄ×ÖÖдò¿ªºó±êµã·ûºÅ³öÏÖÔÚÐÐÊ×Ôõô°ì£¿
¡¡¡¡´ð£ºÇëÔÚ¡¾¹¤¾ß¡¿-¡¾Ñ¡Ïî¡¿-¡¾ÖÐÎÄ°æʽ¡¿-¡¾Ê×λ×Ö·û¡¿-¡¾ºóÖñêµã¡¿ÖÐÊÖ¹¤Ìí¼Ó³öÏÖÔÚÐÐÊ׵ıêµã·ûºÅ¡£

¡¡¡¡¿ÉÒÔÓÃwps´ò¿ªMS officeÎļþÂð?
¡¡¡¡´ð£ºÓû§¿ÉÒÔʹÓÃwps office 2005µÄÈý¸öÄ£¿é:wpsÎÄ×Ö¡¢wps±í¸ñ¡¢wpsÑÝʾֱ½Ó´ò¿ª¡¢±à¼­Óë±£´æÏà¶ÔÓ¦MS officeµÄword¡¢Excel¡¢PowerPointÎļþ¡£

¡¡¡¡ÈçºÎ½«wpsÎļþ±£´æΪMS officeÎļþ¸ñʽ?

¡¡¡¡´ð£ºÑ¡Ôñн¨Îļþ£¬Ä¬Èϱ£´æΪ*.doc *.xls *.pptµÈMS officeµÄÎļþÀàÐÍ¡£

¡¡¡¡wps office2005µÄ¶þ´Î¿ª·¢ºÍ΢ÈíµÄoffice¶þ´Î¿ª·¢ÓÐʲôÒìͬ?
¡¡¡¡´ð£ºwps office2005µÄ¶þ´Î¿ª·¢½Ó¿ÚÌåϵºÍ΢ÈíofficeµÄ¶þ´Î¿ª·¢½Ó¿ÚÌåϵ»ù±¾±£³ÖÒ»Ö¡£°üÀ¨£º¶ÔÏóÊ÷£¬¼´¶ÔÏóµÄ×éÖ¯¹¹³É¡¢¸÷¶ÔÏó´ú±íµÄº¬ÒåºÍ΢Èíoffice¶ÔÏó¾ù±£³ÖÒ»Ö£»½Ó¿Úº¯Êý£¬¼´¸÷¶ÔÏóµÄ·½·¨ÊôÐÔµÄÃû³ÆºÍº¬Òå¾ùÓë΢Èíoffice±£³ÖÒ»Ö¡£

¡¡¡¡Ô­ÓеÄÓëwps office 2003»òÕßwps office 2002½áºÏµÄµÚÈý·½³ÌÐò£¬ÐèÒª×öʲô¸Ä¶¯²ÅÄÜÕý³£ºÍwps office2005½áºÏÔËÐУ¿
¡¡¡¡´ð£ºÊ¹ÓÃVB±àдµÄ³ÌÐò£¬ÐèÒª½«ÒýÓÿâ¸ÄΪÉý¼¶ºóµÄÀàÐÍ¿â¡£²¢½«¶þÕß½Ó¿ÚÓвî±ðµÄ²¿·Ö½øÐÐÐ޸ģ¬È»ºóÖØбàÒ롣ʹÓÃVC±àдµÄ²¢Óõ½CLSIDµÄ³ÌÐò£¬ÐèÒªÖØдÕâЩCLSID¡£²¢½«¶þÕß½Ó¿ÚÓвî±ðµÄ²¿·Ö½øÐÐÐ޸ģ¬È»ºóÖØбàÒë¡£

¡¡¡¡ºÎÆô¶¯wpsÎÄ×ÖÄ£¿é£¿£¨ÒÔVBΪÀý£©
¡¡¡¡´ð£ºÈç¹ûwpsÎÄ×ÖÄ£¿éÒѾ­Æô¶¯£¬¿ÉÒÔʹÓÃGetObject »ñµÃÕâ¸ö½ø³Ì£º Set wpsApp = GetObject(, "wps.Application")wpsApp.Visible = True ¡¡¡¡Èç¹ûwpsÉÐδÆô¶¯£¬¿ÉÒÔʹÓÃCreateObject À´²úÉúÒ»¸öнø³Ì£º Set wpsApp = CreateObject("wps.Application")wpsApp.Visible = True

¡¡¡¡ÈçºÎÔÚµ±Ç°ÎĵµÖÐÌí¼ÓÒ»¸ö±í¸ñ£¿
¡¡¡¡´ð£ºÏÂÃæµÄÀý×Ó»áÔÚÎÄÕ¿ªÍ·Ìí¼ÓÒ»¸ö4ÐÐ4Áеıí¸ñ£¬²¢ÔÚ×îºóÒ»¸öµ¥Ôª¸ñÀïдÉÏ"ÐèҪдЩʲô" ×ÖÑù
¡¡¡¡Dim rngTbl As wps.Range
¡¡¡¡Dim wpsTable As wps.Table
¡¡¡¡Set r = ActiveDocument.Range(0, 0)
¡¡¡¡Set wpsTable = ActiveDocument.Tables.Add(r, 4, 4)
¡¡¡¡wpsTable.cell(4, 4).Range.Text = "ÐèҪдЩʲô"

¡¡¡¡ÈçºÎÔÚwpsÖÐÌí¼Ó²Ëµ¥£¿
¡¡¡¡´ð£ºÏÂÃæµÄÀý×Ó»áÔÚ¡°Îļþ¡±²Ëµ¥ÌõÉÏÔö¼ÓÒ»Ï³öʽ²Ëµ¥¡°ÆäËû¡±£¬²¢ÔÚµ¯³öʽ²Ëµ¥ÉÏÔö¼ÓÒ»Ïî¡£
¡¡¡¡sub test()
¡¡¡¡Set Bar = Application.CommandBars("Îļþ")
¡¡¡¡ButtonID = Bar.GetReserveCommandID()
¡¡¡¡Set NewPopMenu = Bar.Controls.Add(wpsControlPopup, Before:=7)
¡¡¡¡NewPopMenu.Caption = "ÆäËû"
¡¡¡¡Set NewSubMenu=Application.CommandBars(NewPopMenu.Caption).Controls.Add(wpsControlButton,Id:=ButtonID)
¡¡¡¡NewSubMenu.Caption = "ÕâÊÇÐÂÔöµÄ²Ëµ¥Ïî"
¡¡¡¡NewSubMenu.OnAction = "OnNewMenu"
¡¡¡¡NewSubMenu.CommandObject = Me
¡¡¡¡End Sub
¡¡¡¡Sub OnNewMenu(hWnd As Long)
¡¡¡¡MsgBox "New Menu Add OK!"
¡¡¡¡End Sub