Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Put in clipboard, but keep the current content
Hello group,
I have a userform to add or edit comments and progress reports regarding a project my team is working on. There is a button to insert the date (in square brackets) in the textbox where the cursor happens to be. There are 3 textboxes. I have this code that formats the date, puts it in the clipboard, and pastes it into the textbox: Dim Date1 As New DataObject Date1 .SetText "[" & Format(Date, "dd/mm/yy") & "] " Date1 .PutInClipboard Application.SendKeys ("^v") Howecer, by copying to the clipboard, I wipe whatever is there previously. In some cases this is very inconvenient. Is there a way to store the contents of the clipboard somewhere, perform this action, and then put the previous contents back in the clipboard? My attempts to put some GetFromClipboard and PutInClipboard lines in series were unsuccessful. Only the first action seems to get through. Or the second gets put into a second clipboard instance, which I don't know how to address. Is there a way to address a specific clipboard instance, so that after pasting the date, i can still use Ctrl + V to paste whatever I copied earlier into the form? Or is there a way to reference the active textbox and enter the formatted date directly at the top left, without going via the clipboard? Any assistance would be appreciated. Eric |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Where does Ms XL store the clipboard ? or where does MS Windowsstore clipboard ? | Setting up and Configuration of Excel | |||
Where does Ms XL store the clipboard ? or where does MS Windowsstore clipboard ? | Setting up and Configuration of Excel | |||
Clipboard empty but still get waring that clipboard is full | Excel Discussion (Misc queries) | |||
Copy current row to clipboard and delete row | Excel Discussion (Misc queries) | |||
How to transpose formulas from column content to row content. | Excel Worksheet Functions |