Home |
Search |
Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Paste from clipboard to an Excel table
Is it possible to paste from the clipboard object directly into a multi-field
MS Acess table, or alternatively into an array. The data on the clipboard will be multi column and multi row data. The tabel will have the same number of columns (fields). I know there are other ways of performing this task, but this option is the best for the circumstances. Thanks -- CW |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Paste from clipboard to an Excel table
Yes, it does work.
-- Regards, Dave Patrick ....Please no email replies - reply in newsgroup. Microsoft Certified Professional Microsoft MVP [Windows] http://www.microsoft.com/protect "ChrisW" wrote: | Is it possible to paste from the clipboard object directly into a multi-field | MS Acess table, or alternatively into an array. | | The data on the clipboard will be multi column and multi row data. The | tabel will have the same number of columns (fields). | | I know there are other ways of performing this task, but this option is the | best for the circumstances. | | Thanks | | -- | CW |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Paste from clipboard to an Excel table
DO you think you could post some sample code as to how to do this?
"Dave Patrick" wrote: Yes, it does work. -- Regards, Dave Patrick ....Please no email replies - reply in newsgroup. Microsoft Certified Professional Microsoft MVP [Windows] http://www.microsoft.com/protect "ChrisW" wrote: | Is it possible to paste from the clipboard object directly into a multi-field | MS Acess table, or alternatively into an array. | | The data on the clipboard will be multi column and multi row data. The | tabel will have the same number of columns (fields). | | I know there are other ways of performing this task, but this option is the | best for the circumstances. | | Thanks | | -- | CW |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Paste from clipboard to an Excel table
Sorry you made no mention of a code. Why not use TransferText from access?
http://msdn.microsoft.com/library/en...ansferText.asp -- Regards, Dave Patrick ....Please no email replies - reply in newsgroup. Microsoft Certified Professional Microsoft MVP [Windows] http://www.microsoft.com/protect "ChrisW" wrote: | DO you think you could post some sample code as to how to do this? |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Paste from clipboard to an Excel table
Should have been TransferSpreadsheet Method
http://msdn.microsoft.com/library/de...ansferText.asp -- Regards, Dave Patrick ....Please no email replies - reply in newsgroup. Microsoft Certified Professional Microsoft MVP [Windows] http://www.microsoft.com/protect |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Paste from clipboard to an Excel table
Thanks for you response.
The code is actually running in an Excel spreadsheet and I'm opening another spreadsheet and wanting to paste the data into an Access table. "Dave Patrick" wrote: Should have been TransferSpreadsheet Method http://msdn.microsoft.com/library/de...ansferText.asp -- Regards, Dave Patrick ....Please no email replies - reply in newsgroup. Microsoft Certified Professional Microsoft MVP [Windows] http://www.microsoft.com/protect |
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
Paste from clipboard to an Excel table
I would still use the TransferSpreadsheet Method.
Some assumptions; there is an access database named 'test.mdb' located in 'D:\DATA\Access' there is a workbook named 'SomeWB.xls' located in 'D:\DATA\Excel' there are some column names in the workbook at A1:A3 there is some data in the workbook at B1:C3 Paste the code below in a new module in 'D:\DATA\Excel\SomeWB.xls' and run SendData ------------------------------------ Public Sub SendData() Dim strConPathToDB As String strConPathToDB = "D:\DATA\Access\test.mdb" Dim appAccess As Object Set appAccess = CreateObject _ ("Access.Application." & AccessVersion & "") appAccess.OpenCurrentDatabase strConPathToDB appAccess.Visible = False appAccess.DoCmd.TransferSpreadsheet _ acImport, acSpreadsheetTypeExcel9, _ "tblNames", "D:\DATA\Excel\SomeWB.xls", _ True, "a1:c3" appAccess.CloseCurrentDatabase appAccess.Quit End Sub Public Function AccessVersion() Dim WshShell Set WshShell = CreateObject("WScript.Shell") Select Case WshShell.RegRead("HKCR\Access.Application\CurVer\" ) Case "Access.Application.8" AccessVersion = 8 Case "Access.Application.9" AccessVersion = 9 Case "Access.Application.10" AccessVersion = 10 Case "Access.Application.11" AccessVersion = 11 End Select End Function ------------------------------------ -- Regards, Dave Patrick ....Please no email replies - reply in newsgroup. Microsoft Certified Professional Microsoft MVP [Windows] http://www.microsoft.com/protect "ChrisW" wrote: | Thanks for you response. | | The code is actually running in an Excel spreadsheet and I'm opening another | spreadsheet and wanting to paste the data into an Access table. |
#8
Posted to microsoft.public.excel.programming
|
|||
|
|||
Paste from clipboard to an Excel table
Third times the charm;
http://msdn.microsoft.com/library/en...preadsheet.asp -- Regards, Dave Patrick ....Please no email replies - reply in newsgroup. Microsoft Certified Professional Microsoft MVP [Windows] http://www.microsoft.com/protect |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Cannot paste between 2 excel spreadsheets w/o office clipboard ope | Excel Discussion (Misc queries) | |||
unable to copy/paste in excel once clipboard becomes full | New Users to Excel | |||
how do I paste formulas in excel clipboard? | Excel Discussion (Misc queries) | |||
How do I paste from clipboard to range using Excel VBA | Excel Programming | |||
Paste Clipboard from Word to last row in excel | Excel Programming |