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

[µo°Ý] VBA»yªk°ÝÃD

§A¥ý½T»{¬Ý¬Ý³o­Ó°j°é,  ¬O§_¦³±½§¹¾ã­Óºô­¶ªº input

        For Each sDoc In .all.tags("input")
            'If sDoc.Name = "item" Then sDoc.Value = Range("A1").Offset(x, 0)
            'If sDoc.Name = "mailNumber" Then sDoc.Value = Range("B1").Offset(x - 1, 0)
            x = x + 1
            debug.print sDoc.Name
        Next

TOP

        ÀR«ä¦Û¦b : ¨ü¤HÂI¤ô¤§®¦¡A¶··í´é¬u¥H³ø¡C
ªð¦^¦Cªí ¤W¤@¥DÃD