Contextual Guidance at the moment of need helps your employees adopt to new software or processes instantly. Boost knowledge retention and employee engagement step-by-step with one easy solution.
Dim xlObject As EXCEL.Application Dim xlWB As EXCEL.Workbook Dim r As Long Set xlObject = New EXCEL.Application 'This Adds a new woorkbook, you could open the workbook from file also Set xlWB = xlObject.Workbooks.Add Clipboard.clear 'Clear the Clipboard With MSHFlexGrid_LOAD_RECAP 'Select Full Contents (You could also select partial content) .Col = 0 'From first column .Row = 0 'From first Row (header) .ColSel = .Cols - 1 'Select all columns .RowSel = .Rows - 1 'Select all rows Clipboard.SetText .Clip 'Send to Clipboard End With With xlObject.ActiveWorkbook.ActiveSheet xlObject.ActiveWorkbook.ActiveSheet.Columns("A:V").HorizontalAlignment = xlLeft xlObject.ActiveWorkbook.ActiveSheet.Columns("A:V").NumberFormat = "@" xlObject.ActiveWorkbook.ActiveSheet.Range("a3") = "Load result:" xlObject.ActiveWorkbook.ActiveSheet.Range("a3").Font.Bold = True xlObject.ActiveWorkbook.ActiveSheet.Range("B3") = Format(Date, "mmm dd, yyyy") xlObject.ActiveWorkbook.ActiveSheet.Range("b3").Font.Bold = True xlObject.ActiveWorkbook.ActiveSheet.Range("D5").NumberFormat = "0" .Range("A6").Select 'Select Cell A1 (will paste from here, to different cells) .Paste 'Paste clipboard content
|Getting warning: You are about to delete 1 row(s)||9||54|
|How to update a sql 2012 database table with the time difference from 2 time frames in vb.net 2010||4||96|
|How to return the focus to the row of the datagrid (vb6) even though the SQL data rows exceed the max windows rows displayed.||16||91|
|clicking a shape in a frame array vb6||3||48|