Count the rows in the clipboard

[2077delta]

I am copying information from a data extraction application called Monarch and then pasting it into Excel. The data to be pasted has to be inserted in between some existing data in the worksheet. Is there a way to count the number of rows in the clipboard so I can insert this number of rows into my worksheet then paste the data from the clipboard?

 

[Gary McMaster]

The following might work if you don't have linefeeds embedded in individual cells.

However, it might be easier to just paste the data into a "temp" worksheet at cell "A1" then count the rows in the temp sheet.

Hope it helps.

Gary

Public Sub Test()

'Need reference to Microsoft Forms 2.0 Object Library
Dim oClip As New MSForms.DataObject
Dim vSplit As Variant

oClip.GetFromClipboard
vSplit = oClip.GetText

vSplit = Split(vSplit, vbCrLf)

MsgBox UBound(vSplit) & " Rows"

End Sub

 

[2077delta]

Perfect, exactly what I was looking for. Thanks!