textbox 하나 추가, fpspread  하나 추가 한후 아래 소스 실행해본다.

Private Sub Command1_Click()
    
    ' 첫번째 인자 : Col 시작위치
    ' 두번째 인자 : Row 시작위치
    ' 세번째 인자 : Col 마지막위치
    ' 네번째 인자 : Row 마지막 위치
    
    Call fpSpread1.SetSelection(2, 1, 2, 5)
    
    ' 클립보드 카피
    fpSpread1.ClipboardCopy
    
End Sub

Private Sub Form_Load()
    fpSpread1.MaxCols = 2
    fpSpread1.MaxRows = 10
    fpSpread1.AllowMultiBlocks = True
    Call fpSpread1.SetText(1, 1, 12)
    Call fpSpread1.SetText(1, 2, 132)
    Call fpSpread1.SetText(1, 3, 142)
    Call fpSpread1.SetText(1, 4, 152)
    Call fpSpread1.SetText(1, 5, 126)
    Call fpSpread1.SetText(1, 6, 127)
    Call fpSpread1.SetText(1, 7, 128)
    Call fpSpread1.SetText(1, 8, 129)
    Call fpSpread1.SetText(1, 9, 120)
    Call fpSpread1.SetText(1, 10, 121)
    Call fpSpread1.SetText(2, 1, 122)
    Call fpSpread1.SetText(2, 2, 132)
    Call fpSpread1.SetText(2, 3, 142)
    Call fpSpread1.SetText(2, 4, 152)
End Sub





참고로 요것 하는 이유는..스프레드 내용을 엑셀로 보내야 하는 경우가 있다.
그럴 경우 대게 for문 돌면서 스프레드값 가져와서 엑셀에 기록하는데 해보면 알겠지만 속도가 예술로 느리다. -_-..

그래서 생각한것이 스프레드의 내용을 클립보드로 저장한 다음에 엑셀로 그 클립보드 내용 붙여넣기 하는 방식이다.
xlsheet.Range("D3:H148").PasteSpecial (xlPasteValues)

대강..요건 구문으로 붙여넣기 할 수 있음
이 게시물을...