  | 
				VFP 愛用者社區 本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.   
				 | 
			 
		 
		 
	
		| 上一篇主題 :: 下一篇主題   | 
	 
	
	
		| 發表人 | 
		內容 | 
	 
	
		Cedric
 
 
  註冊時間: 2003-08-02 文章: 19
 
  第 1 樓
  | 
		
			
				 發表於: 星期二 十一月 14, 2017 11:05 am    文章主題: 請問如何將EXCEL選取欄位放大顯示在視窗中?  (OK) | 
				     | 
			 
			
				
  | 
			 
			
				請問一下.在VFP中開啟EXCEL, 找到需要的欄位後, 想將欄位放大顯示在視窗中
 
 
			lcrowcol = 'R59' 
 
			loSheet.Range(lcrowcol).Select
 
			lXLApp.Activewindow.WindowState = 2
 
			lXLApp.ActiveWindow.Zoom = 200
 
			lXLApp.Visible=.T.
 
 
想將 R59 ~ T61 放大顯示在視窗中.
 
利用巨集查詢"縮放至選取範圍",  lXLApp.ActiveWindow.Zoom = True
 
執行時會出現 "Variable True is not found"
 
 
如果使用 lXLApp.ActiveWindow.Zoom = 200
 
選取欄位會放大, 但不會顯示在左上角.
 
 
請問各位是否有其他寫法? 謝謝.
   Cedric 在 星期二 十一月 28, 2017 11:04 am 作了第 1 次修改 | 
			 
		  | 
	 
	
		| 回頂端 | 
		 | 
	 
	
		  | 
	 
	
		perry
 
 
  註冊時間: 2014-07-20 文章: 203
 
  第 2 樓
  | 
		
			
				 發表於: 星期二 十一月 14, 2017 11:28 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				lXLApp.ActiveWindow.ScrollRwo=59  
 
** 將第59列捲至視窗最上方
 
lXLApp.ActiveWindow.ScrollColumn=18
 
** 將第18欄捲至視窗最左方 | 
			 
		  | 
	 
	
		| 回頂端 | 
		 | 
	 
	
		  | 
	 
	
		Cedric
 
 
  註冊時間: 2003-08-02 文章: 19
 
  第 3 樓
  | 
		
			
				 發表於: 星期二 十一月 14, 2017 11:41 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				謝謝 perry.
 
測試可以了. | 
			 
		  | 
	 
	
		| 回頂端 | 
		 | 
	 
	
		  | 
	 
	
		 | 
	 
 
  
  	 
	    
  	   | 
 	
您 無法 在這個版面發表文章 您 無法 在這個版面回覆文章 您 無法 在這個版面編輯文章 您 無法 在這個版面刪除文章 您 無法 在這個版面進行投票 您 無法 在這個版面附加檔案 您 無法 在這個版面下載檔案
  | 
   
  
		 |