Excel VBA ¥Îtextbox·s¼Wªí³æ¸ê®Æ°ÝÃD
- ©«¤l
- 60
- ¥DÃD
- 4
- ºëµØ
- 0
- ¿n¤À
- 64
- ÂI¦W
- 0
- §@·~¨t²Î
- w7-32
- ³nÅ骩¥»
- 2013.2003
- ¾\ŪÅv
- 20
- µù¥U®É¶¡
- 2014-11-23
- ³Ì«áµn¿ý
- 2016-6-6
|
x = TextBox2.Value
If x < 60 Then
y = [B20].End(xlUp).Row + 1
Else
y = [B65536].End(xlUp).Row + 1
If y < 20 Then y = 20
End If
Cells(y, 2) = x |
|
|
|
|
|
|