標題: 請教一些 關於 矩陣指定 相關問題 [打印本頁]

---

作者: mark15jill    時間: 2012-9-11 10:50     標題: 請教一些 關於 矩陣指定 相關問題

Q1 若想將下列程式 改為 顯示LABEL 的NAME 應該要怎修改比較妥當  ( Userform1   內有 LABEL 1~10)
Q2 矩陣 表示  Label 想請問Q2 code 程式碼要怎修改?


Q1 code

1. Dim st As Range
   
2. 
   
3. For pgx = 1 To 10
   
4.    
   
5.     Set s1t = 工作表1.Cells(pgx, 1)
   
6.     s1t.Value = pgx
   
7.    
   
8.     Set s2t = 工作表1.Cells(1, pgx)
   
9.     s2t.Value = s1t.Value
   
10. 
    
11.     Set s3t = 工作表1.Cells(s1t, s2t)
    
12.     s3t.Value = s1t.Value
    
13.    
    
14. 
    
15. Cells(s1t, s2t).Select
    
16.     Selection.ColumnWidth = 5
    
17.     Selection.RowHeight = 25
    
18. 
    
19. 
    
20. 
    
21. Next pgx

複製代碼

Q2 code
for i = 1 to 10
i = label & i .caption
cells(i,1)=label & i  



next i

---

作者: Hsieh    時間: 2012-9-11 11:43

回復 1# mark15jill
看不懂你的需求
我猜是你無法指定到Label
[attach]12452[/attach]

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)