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

[µo°Ý] Ãö©óµ{¦¡½XTarget.EntireRow.Columns.Count

[µo°Ý] Ãö©óµ{¦¡½XTarget.EntireRow.Columns.Count

Private Sub Worksheet_Change(ByVal Target As Range)
Dim MyID As String
   
    If Target.Columns.Count = Target.EntireRow.Columns.Count Then Exit Sub

Target.Columns.Count ¡÷·í«e©Ò¿ï¨úÀx¦s®æ½d³òªº¦æ(Äæ)¼Æ
Target.EntireRow.Columns.Count ¡÷¡H³o¸Ì¬Ý¤£À´¡AÀµ½Ð¥ý¶i½ç±Ð¡AÁÂÁ¡I

¦^´_ 2# stillfish00 ·PÁÂstillfish00 ¤j¼ö¤ß»¡©ú¡A¦b¤U¨ü±Ð¤F¡AÁÂÁ¡I

TOP

¦^´_ 4# GBKEE

·PÁ±z¹ï§Ú³oªì¾Çµæ³¾ªº¼ö¤ß´£¿ô¡A¥H«áª¾¹D­nµ½¥ÎF1¡AÁÂÁ¡IÀò¯q¨}¦h¡C

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