1、单元格通过Ctrl+C   复制,Ctrl+V粘贴。目前我可以实现从Spread外部(如Excel)复制数据粘贴到Spread单元格中,或是在Spread单元格的编辑模式下可以复制成功。剪切也可以成功。问题是选中单元格后,复制无法实现。   
  2、如何实现Spread下拉复制功能。类似Excel的下拉复制。   
  请兄弟们帮帮忙,提供思路或代码。谢谢了(分不够可以加)!!! 
很着急阿!!!在线等答案!!!希望高手指点迷津!!!谢谢你先!!!!!!!!!!!!!!!!!!!!!!!!!!

解决方案 »

  1.   

    供参考
    Private Sub otcSpread_BlockSelected(ByVal BlockCol As Long, ByVal BlockRow As Long, ByVal BlockCol2 As Long, ByVal BlockRow2 As Long)
        Dim plngI As Long
        Dim pstrValue As String
        Dim psinValue As Single
        
         With otcSpread
              '复制
                .Row = BlockRow
                .Col = .ActiveCol
                pstrValue = .Value
                If pstrValue = "" Then
                    .Row = BlockRow2
                    .Col = .ActiveCol
                    pstrValue = .Value
                End If
                
                For plngI = BlockRow To BlockRow2
                    .Row = plngI
                    .Col = .ActiveCol
                    .Value = pstrValue
                    .Col = 1
                    .Value = 1
                Next
         End With
    End Sub
      

  2.   

    怎么可以实现从Spread外部(如Excel)复制数据粘贴到Spread单元格中,使用CTRL+c复制,使用ctrl+v粘贴,
    很着急阿!!!在线等答案!!!希望高手指点迷津!!!谢谢你先!!!!!!!!!!!!!!!!!!!!!!!!!!
      

  3.   

    怎么可以实现从Excel复制数据粘贴到Spread单元格中,使用CTRL+c复制,使用ctrl+v粘贴, 
    很着急阿!!!在线等答案!!!希望高手指点迷津!!!谢谢你先!!!!!!!!!!!!!!!!!!!!!!!!!!