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

[µo°Ý] vba function¦A°Ý

[µo°Ý] vba function¦A°Ý

¦U¦ì°ª¤âµ{¦¡¦p¤U
Public Function  test( A,B)
A.Text = Left((A.Text), Len(AText) - 1)
B.SelStart = Len(A.Text)
end
Sub ComboBox15_Change()
Dim A,B as string
  A=UserForm1.ComboBox15
  B="UserForm1.ComboBox15"
  test(A,B)
End sub
¦ý¬O¨C¦¸³£·|¥X²{¥²¶·­n¦³¹Bºâ¦¡¡A½Ð°Ý§Ú­þ¸Ì¦³¿ù??·Ð½Ð«ü¥¿

test A , B

TOP

        ÀR«ä¦Û¦b : ¡i®É¶¡µLªk¾B¾×¡j©È®É¶¡®ø³u¡Aªá¤F³\¦h¤ß¦å¡A·QºÉ¦U¦¡¤èªk­n¾B¾×®É¶¡¡Aµ²ªG¬O¡G®ö¶O¤F§ó¦h®É¶¡¡A¥B¤@µL©Ò¦¨¡I
ªð¦^¦Cªí ¤W¤@¥DÃD