Jonathan은 매크로를 만들고 있으며 값으로 셀 범위를 채워야합니다. 예를 들어 A1 : C1 범위를 채워야하는 경우 현재 해당 범위를 채우려면 세 개의 문이 필요합니다.

Range("A1") = "Test1"

Range("B1") = "Test2"

Range("C1") = "Test3"

그는 다음과 같이 하나의 문장으로 그것들을 채우는 방법이 있는지 궁금합니다.

Range("A1:C1") = ("Test1","Test2","Test3")

Jonathan이 원하는 구문은 비슷하지만 작동하지 않습니다. 작동 방식은 다음과 같습니다.

Range("A1:C1") = Array("Test1","Test2","Test3")

뒤에 오는 것은 연산자 왼쪽에있는 셀 시퀀스에서 사용할 값 시퀀스로 간주되어야한다고 VBA에 알려주는 Array 문 사용에 유의하십시오. 흥미롭게도 다음과 같이 값을 변수에 넣고 Array 문을 사용할 수도 있습니다.

sOne = "Apples"

sTwo = "Oranges"

sThree = "Artichokes"

Range("A1:C1") = Array(sOne, sTwo, sThree)

원하는 경우 직선 변수로 작업 할 수도 있습니다.

Dim sMyStrings(2) As String sMyStrings(0) = "Apples"

sMyStrings(1) = "Oranges"

sMyStrings(2) = "Artichokes"

Range("A1:C1") = sMyStrings

위의 코드는 다음과 같이 다시 작성할 수도 있습니다.

Dim sMyStrings(2) As String sMyStrings = Array("Apples", "Oranges", "Artichokes")

Range("A1:C1") = sMyStrings

마지막으로 값을 행이 아닌 단일 열에 배치하려면 다음과 같은 방식으로 Transpose 함수를 사용해야합니다.

Range("A1:A3") = Application.Transpose(Array("Test1","Test2","Test3"))

_ 참고 : _

이 페이지 (또는 ExcelTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶다면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.

link : / excelribbon-ExcelTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요].

_ExcelTips_는 비용 효율적인 Microsoft Excel 교육을위한 소스입니다.

이 팁 (11702)은 Microsoft Excel 2007, 2010, 2013 및 2016에 적용됩니다.

Excel의 이전 메뉴 인터페이스에 대한이 팁의 버전은 여기에서 찾을 수 있습니다.

link : / excel-Filling_a_Range_of_Cells_with_Values ​​[값으로 셀 범위 채우기].