ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

Excel VBA ¥Îtextbox·s¼Wªí³æ¸ê®Æ°ÝÃD

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

TOP

        ÀR«ä¦Û¦b : ¦³¦h¤Ö¤O¶q´N°µ¦h¤Ö¨Æ¡A¤£­n¤ß¦sµ¥«Ý¡Aµ¥«Ý¤~·|¸¨ªÅ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD