Tracking Forums, Newsgroups, Maling Lists
Home Scripts Tutorials Tracker Forums
  Advanced Search
  HOME    TRACKER    Excel


Double Click In Cell And Copy The Value Into Another Cell

The datas has stored in columns "a:g" all the way down.

When i double click any cell in column "A" I would like to store the value one by one into the column "K" from first cell to down.

View Complete Thread with Replies

Sponsored Links:

Related Forum Messages:
On Click (or Double) Copy Cell Value To Next Worksheet
I'm trying to do is create a link so that if you double click on a cell in a range (Sheet1!A3:A100) it will copy the value (ie Sheet1!A6) and paste it to the next sheet in a fixed cell (sheet2!B2).

The reason is I want to use the next sheet to do Vlookups (or may just do it in a macro) to fill in a template.

View Replies!   View Related
Run Macro On Double Cell Click If Cell Part Of Named Range
I have a sheet where i have many differently named areas (like state1_1 and state1_2) When I doubleclick on a cell then a macro should run with following criteria: 1) Macro will run if the doubleclicked cell is part of any range in the list. Here I mean that names of ranges which belong to that list start with word state (like state1_1 and state1_2). No other ranges should not be in that list. If the cell is not in the range that is part of the list, then nothing should happen.

View Replies!   View Related
Double Click Cell To Jump To Sheet
I have a list of numbers in column B of one sheet.

these numbers are unique and randomly allocated to other sheets in the workbook.

i would like a macro which when a user double clicks on a cell in the list of numbers .. the macro will jump to the sheet containing that number.. (i.e. do something like the find function)...

I have some code below which might be useful for you but I can't work out what I need to write.

View Replies!   View Related
Add Diagonal Borders To Cell On Double Click
I have made a toggle button to turn diagonal borders on and off in a single cell. Is there a way to make the button transparent, such that the button can be placed over the cell itself and the contents of the cell will be visible underneath, no matter the condition of the toggle?

View Replies!   View Related
Double Click Calendar In Cell Range Only
I've been reading through the forums, but do not know how to double click to get the calendar pop up,only in a certain range (e.g. Cells G5:G85).

I already have the module: frmCalendar

Running Office 2003

View Replies!   View Related
Launch UserForm With Double Cell Click
I've found the code below and tweaked to suit my needs but having trouble. Had it working one time. The code below calls a userform when the user double clicks on a cell. The form pops up and is not active/enabled. I cannot select anything on the form until I select a cell on the sheet, then everything on form becomes active/enabled.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'check cells for desired format to trigger the routine
'otherwise exit the sub
Dim NumberFormat, DF
NumberFormat = Array("[Blue]General")
For Each DF In NumberFormat
If DF = Target.NumberFormat Then
frmSel_WBS.Show vbModeless
End If
End Sub

View Replies!   View Related
Have ComboBox Appear On Cell Selection & Double Click
I am looking for assisitance in combining the functionality of two seperate combo box code sets. The first combo box code set allows the combo box to automaticially appear when a user Clicks on a cell that contains a data validation list. The second set of code will have a combo box appear when a user Double-clicks on a cell that contains a data validation list. And the code allows for Named Ranges on a seperate worksheet.
I would like to have the functionality of having the combo box to appear when a user Clicks on a cell and not having to Double-click. Also, I would like to have the option to use Named Ranges on a seperate worksheet ("Validation Lists").

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim str As String
Dim cboTemp As OLEObject
Dim ws As Worksheet
Set ws = ActiveSheet
On Error Goto errHandler
If Target.Count > 1 Then Goto exitHandler
Set cboTemp = ws.OLEObjects("TempCombo")
On Error Resume Next
If cboTemp.Visible = True Then
With cboTemp
.Top = 10
.Left = 10
.ListFillRange = ""
.LinkedCell = ""
.Visible = False
.Value = ""
End With
End If................

View Replies!   View Related
Open Message Box On Double Click In Cell
I am trying to make it so that when you double-click in a cell in column A, a message box opens populated with the text string in the corresponding cell (same row) in column Z. Seems to me like it should be easy enough, but despite spending the last hour searching for clues, I can't seem to figure it out.

View Replies!   View Related
Double-Click Cell Border Jumps To Other Cells
I'm trying to double-click a cell to edit the contents, and I am off a few pixels, it treats the double-click as a double-click on the cell border, not the cell contents, and the focus jumps to another cell in the direction of the border instead of going into edit mode. The effect is as if I had pressed Ctrl and the arrow in the direction of the border I clicked on.

The only way I've found to disable this is to turn off the option "Enable fill handle and cell drag-and-drop", but unchecking that also disables actually useful things, like dragging the corner of a formula call to copy it down, etc.

Is there a good way to disable this cell jumping when I accidentally double-click a cell border?

View Replies!   View Related
Double Click Merged Cell To Display Userform -
following on from previous post ( what if the selected cell is a merged cell (cell count is greateer than 1), what is the best solution to enable double click event on merged cell ?

View Replies!   View Related
Append More Than 256 Characters From Cell On Double Click To TextBox
if there is a workaround to this issue. I have this code that transfers data to a textbox but it stops after hitting the character limit. Does anyone know how to extend this limit ?

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
With Me.Shapes("textbox1").TextFrame.Characters
.Text = .Text & Target.Value
End With
End Sub

View Replies!   View Related
Double Click In Cell To Show Current Date And Time
I would like to be able to track progress of various tasks/occurences by allowing users of a spreadsheet to just click in the appropriate column and in doing so, it would fill in the current time and date. I.E. Column headings would read, "Item Sent to Review", "Item Received From Review", "Item Sent to Specialist", etc. and I want users to be able to double click in a given column to populate with current date/time information,

View Replies!   View Related
Double-Click Cell On Protected Sheet To Open UserForm
I have spreadsheet with client names. I'd like to build logic that will open a form with client information when a user double-clicks on the client name. But I have a couple of problems.

- First, I'd like to protect the sheet and hide the formulas. But when I protect the sheet, I get the "the cell or chart you are trying to change is protected" error when I double click the protected cell.

- If I deselect the "Select Locked Cells" options when I protect the sheet, I no longer have the ability to double-click on the cell.

how I can double click on a cell yet not allow the user to edit the cell (or see the formula)?

View Replies!   View Related
Double Click And Copy Data
I have a sheet with some 300 plus rows of data. I use filters to sort through the rows to get down to anywhere from 8 to 10 or so rows. At that point I would like to be able to select (doule click) a filtered row of 10 cells (A:J) copy the data and paste it to a different sheet starting with cell B18. I want to be able to perform this process up to 5 seperate times.

I have recorded a macro to do basically what I am trying but with many short falls. It only selects one row, I cannot double click on a row and it dosen't always paste to the proper cell.

View Replies!   View Related
Automatically Copy Row Meeting Condition On Double Click
Split from Copy Rows, Meeting Criteria, From Multiple Worksheets & Append To Summary Sheet

This has been wrecking my head for a week. For the debtors tab it is all of the rows which have the value "Unpaid" for each of the 12 months that need to be copied into the tab. For the invoice I thought there could be a button at the end of each row and when you clicked it, it put the info into the invoice template and then the person could just print it off and resend it. And then do the same for the rest of the invoices.

View Replies!   View Related
Copy & Paste Cell Value With Before Right Click
I have a worksheet with 2 pivot tables. what I would like to do is, when the user right clicks on a name, the name will be copy and pasted to cell B2 of the other sheet.

View Replies!   View Related
Copy A Cell With Duble Click Event
what im trying to do is to copy only the last 7 characters in column A:A
when i dubleclick on a cell.

if i click on a cell that has "8peu99s8a" i want it to copy only "eu99s8a" wich is the last 7 characters, and then i will past the data to another program i use.
this code will only apply for any cell in column A:A

View Replies!   View Related
Copy A Cell To Clipboard With Single Click
I do lots of web form fill up from excel spreadsheets to a web form.

To copy a cell what I can do is,
select a cell

What I need is when I select a cell, ctrl+c will be triggered auto. So no need for pressing ctrl+c to copy a cell to clipboard.

How can I do it?

View Replies!   View Related
Open With Double-click
I seem to have broken something!. Whenever I double-click to open an Excel file (.xls files are associated correctly), Excel opens, but nothing happens. That status bar says "Ready," but my workbook never appears.

If I do a File-> Open within Excel, then I am able to open the workbook. I have no idea what is going on. This occurs for all Excel files whether they contain macros or not.

View Replies!   View Related
Macro To Run On Double Click
I have populated a listbox from a filtered list and when 'Double Clicking' a name I want a macro to run. All seems to be OK apart from it is not finding/returning any data; I know the data is there and I think it may be the way I'm referencing the listbox value;

Sub CopySignificant()

Dim DestSheet As Worksheet
Set DestSheet = Worksheets("Clients to Invoice")

Dim sRow As Long 'row index on source worksheet
Dim dRow As Long 'row index on destination worksheet
Dim sCount As Long
sCount = 0
dRow = 1...................

View Replies!   View Related
Double Click Range
I have a code for doubleclick on a cell and a gdt application chart will open.

Private Sub Worksheet_BeforeDoubleClicK(ByVal Target As Range, Cancel As Boolean)
Dim i As Integer
Dim gdt As Long
Dim S As String
Cancel = True
With Application

If Target.Address(False, False) "C11" Then Exit Sub

'Place your direct path to open this GDT application

S = "C:Documents and SettingsUserMy DocumentsAndy's MachineINSPECTIONGDTGDT BitmapGD&T_Font.exe"

If Dir(S) = "" Then
MsgBox "File does not exist:" & vbCrLf & S, vbCritical, "Error"
Exit Sub
End If
gdt = Shell("""" & S & """", vbNormalFocus)

End With

End Sub
What would the code be for a range of cells if doulbe clicked the range would be C11 thru C35

Also, I have a double click code for another symbol chart to open.

How, would this be used in the same manner if a coulmn or row were to apply on double click.

View Replies!   View Related
Double Click Event
I am trying to write some questions on cells of Sheet1 of a workbook. Then I want to write the answers on cells of Sheet2 of the same workbook. I want the user to be able to double click the question-cell on Sheet1 and be taken to the respective answer on Sheet2.

View Replies!   View Related
SUM Function And Double Click
I have a spreadsheet that just uses the basic "SUM" function. This morning I went to use it and the function does not work after I change a number within the field of that function. If, however, I go into the SUM function and double click, then hit enter, it does the new calculation.

View Replies!   View Related
Highlight On Double Click
here is what i am trying to accomplish:

on the worksheet there are six ranges...each range has three columns...the first is team name, the second is rep name, and the third is the metric being measured.

what i would like to happen is...

when a team name is double clicked in any one of the ranges, i would like all three cells (team name, rep name, and metric) to be boldfaced and have the cell interior change color for all instances across all six ranges that match the team name double clicked. when double clicked again, it should go back to original formatting.

likewise, when a rep name is double clicked in any one of the ranges, i would like all three cells (team name, rep name, and metric) to be boldfaced and have the cell interior change color for all instances across all six ranges that match the rep name double clicked. when double clicked again, it would go back to original format.

so for example, if i happen to click on a cell in the team column in the second range for "team a", all cells in each range (including the adjacent cells for rep and metric) would be highlighted.

View Replies!   View Related
Reverse Before Double Click
I am trying to create code so that when a cell in Column C (for example C1) is double clicked, it makes the font bold, italicized, blue and inserts a row below the double clicked cell. I am also trying to make it so that if the cell is double clicked again, it removes the bold, italics, blue and deletes the row that was previously inserted.

Private Sub Worksheet_BeforeDoubleClick _
(ByVal Target As Excel.Range, Cancel As Boolean)
If Target.Font.Bold Then
ActiveCell.Offset(1, 0).Rows("1:1").EntireRow.Select
Selection.Insert Shift:=xlDown
Cancel = True
If Not Target.Font.Bold Then
ActiveCell.Offset(1, 0).Rows("1:1").EntireRow.Select
Selection.Delete Shift:=xlUp
Cancel = True
End If
End If
End Sub

View Replies!   View Related
Run Macro On Double Click
I want a X to be put in the activecell if empty or removed if already there. By searching this forum I found and read the article "Adding a Command Button to the Excel Right Click Pop-up Toolbar/Command Bar" and was able to add the code to do this to the right click sub menu. Is there a way to do the same thing by double clicking on the cell? This probably seems a bit nit pickey but I would just like for it to work using double click for my users. I wrote the following code to performe the action

Sub Toggle_Macro()
If IsEmpty(ActiveCell) = True Then
ActiveCell.Value = "X"
With Selection
.HorizontalAlignment = xlCenter
End With
With Selection.Font
.Name = "Arial"
.FontStyle = "Bold"
.Size = 12
.ColorIndex = 3
End With
Else: Selection.ClearContents
End If
End Sub

And placed the code below in Private Module of the Workbook Object.................

View Replies!   View Related
Double Click Is Unlocking Worksheet
Testing my worksheet, I found that if I double click on any cell that is not locked, the worksheet becomes unprotected. I need to prevent this from happening. I tried the following code, but it didn't work.

View Replies!   View Related
Code To Simulate A Double Click
I'm trying to find the code which will have the effect of a double click.

I want to use event code so that when I click on a cell once it will cause a drop-down in the cell (the cell is formatted with wrapped text).

View Replies!   View Related
Looping Within Double Click Event
I would like to create a macro in which, when the user double clicks on a cell, that cell will be shaded yellow and other cells within the Workbook containing the same value as that cell will be crossed out. I have come up with the below code, but it doesn't work correctly. Any ideas on what I have done wrong? Would also like it to not cross out the cell the user double clicked on.

Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)

Dim wk As Worksheet
Dim selectedName As String
selectedName = ActiveCell.Value

With Selection.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With

For Each wk In ActiveWorkbook.Worksheets

For i = 200 To 2 Step -1
If ActiveSheet.Cells(i, 2).Value = selectedName Then
ActiveSheet.Cells(i, 2).Font.Strikethrough = True
End If
End Sub

View Replies!   View Related
Double Click To Enter User ID
i have some code that allows my users to enter their user ID on double clicking. The worksheet code below shows how on double clicking into Colum 3 (If Target.Column = 3 Then) then the user ID will appear. Q: How do i get the code to work in Columns 3, 5 and 7 but not those inbetween?! I tried using "or" but it allowed the ID to be entered into all columns! i.e. 3,4,5,6 and 7 which is not what I require. In short I need the ID to appear on double clik into every other column.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

Dim user As String
'This refers to the function ReturnUserName, which takes the name from the NT environment

If Target.Column = 3 Then
Target = ReturnUserName
Cancel = True
End If

End Sub

View Replies!   View Related
Disable Double Click Shortcut
When we double click between two cell it goes to the last entered cell. I would like to disable this through a macro. Can anyone pls provide me a code to disable this.

View Replies!   View Related
Double Click To Activate Message Box
Double Click to Activate Message Box
modify my code to do the following:

View Replies!   View Related
Double Click To Bring Up Form
I'm using a little sub routine to bring up a pop up calendar when i click in a cell, everythings lovely but it annoyingly comes up when i select a clolumn or row that also contains that cell. modification to require a double click to display the calendar?

View Replies!   View Related
Shortcut Key That Acts Like A Double Click
In Excel is there a shortcut key the replaces using your mouse to double click to get into the cell?

View Replies!   View Related
Go To Specified Sheet & Workbook By Double Click
In a folder I have 2 excel files the the first file called products & contains sheets with the names of each product, in each product sheet I recorded the names of some customers.

The second file is called customers & contains sheets with the names of each customer.

when both files are open & I am in the products file I want to be able to select a product lets say shampoo double click on one of the customers & automatically go to the specified customer in the customers file.

I inserted this code in every sheet of products file & things went fine:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

For Each wb In Workbooks
For Each wk In wb.Worksheets
If wk.Name = Target.Value Then
MyWin = wb.Name
End If
Next wk
Next wb

Instead of inserting this code on every sheet module (I might have 60 sheets) I tried to insert it

Just In Thisworkbook module but it didnít work:

Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)

For Each wb In Workbooks
For Each wk In wb.Worksheets
If wk.Name = Target.Value Then
MyWin = wb.Name
End If

View Replies!   View Related
Find Adjacent Cells On Double Click
I have two columns in a spreadsheet.

In cell "$D$3" is the word "Period 1".

I want to be able to do the following.

Double click on cell D3, where the word period 1 is.

VBA then looks up that period in column B, and finds the corresponding weeks for period 1 from column A.

I then want VBA to list these weeks next to the period 1 I double clicked, so in column E.

I have attached a spreadsheet as an example.

View Replies!   View Related
Double Click On A Total It Opens A New Sheet
i am working on a pivot report and it works fine so far, but the only thing i am trying to do here is when duble click on a total it opens a new sheet with the report needed but it names the sheet as sheet1 and so on (sheet2,3,4...)

is there a way when i duble click a total it automaticly names the sheet for me?

View Replies!   View Related
Prevent Sheet Rename By Double-click
Is there a method by which I can prevent a user from renaming a worksheet by doubleclicking on the sheet tab ? Please note that I do not wish to use workbook protect method.

View Replies!   View Related
Listbox Double Click Load Textbox
Is it possible to copy listbox value into the textbox when double click....If the user select any row from listbox and double click on it onether userform will pop up and second column of listbox entry will load into textbox automatically.

View Replies!   View Related
Automatically Moving From One Sheet To Another Through A Double Click
I am trying to do is use VBA to move from the diagram directly to the macro number. The Cells on the Diagram have functions in them and there is no reference to what macro goes with which function. My list loocs like this

Macro NumbersFunctionCommands
1001 Lamp On
1002 Lamp Off
1003 (Empty)
1004 (Empty)
1005 (Empty)
1006 CH 611 611
1007 Ch 612 612
1008 Ch 613 613
1009 Ch 614 614
1010 Ch 615 615
1011 Ch 616 616
1012 Ch 617 617
1013 Ch 618 618

The diagram is a 20 by 20 grid of cells that correspond to macros I have a third sheet that has the macro numbers listed in the same format as the diagram. The problem I have is how to read the corresponding macro number from Sheet 3 then find that number on Sheet 2.

View Replies!   View Related
Range To Work On The Worksheet Before Double Click
I am encountering is that with my knowledge I can only get one range to work on the worksheet_before doubleclick function and thats the sort range.

I need several different ranges with each range giving a target value uinique to that range.

View Replies!   View Related
Using Double-click On Mouse To Perform An Action?
I have an excel file with a column (I) which lists the total number of businesses in a different tab (DATA) that meet certain restrictions (these restrictions being listed in the same row in different cells). When the cell under coluimn "I" is double-clicked, it pulls the businesses from tab DATA that meet the restrictions for that row and shows them all in another tab.

I don't know the person that created this and was wondering if there is a way to figure out what is being done to make this happen? I looked in macros, but didn't see anything relating to this. Anyone know how this is done?

So you know, I have tried double-clicking other cells, but nothing happens - not even editing into the cell (altho this can be done from the toolbar up top).

View Replies!   View Related
Double Click To Run A Sub But Then It Runs The Userform Activate Sub
I have a userform that has a listbox that contains data in 7 columns. I also have a command button that when clicked allows the user to edit the data in whatever row of the list box is highlighted. This works fine.

I decided to have a double click in the listbox on a row do the same thing. So I simply picked the double click event and called the command button sub. When I try this, it runs the command button sub, but then it runs the userform Activate sub. This is a problem as it does things that I do not want to occur again.

I then decided to put the command buttom code in a separate sub and then call that sub on the double click -- same result.

Then I just put the exact code that I have in the command button into the double click event -- still does it.

Anyone know why this happens, I see no reason for it. It works great in the command button, but with double-click it run the userform Activate sub when it is done.

Here is the code that runs (if called by a command button it works fine, if called by a double_click in the listbox, it runs the userform_activate sub):

Private Sub Edit()
SetCell = "d" & ListBox1.ListIndex + 5

Range("AA1").Value = 1

NextRow = Range("D65536").End(xlUp).Row
EndARR = "J" & NextRow
ODCData = Range("D5", EndARR)

ListBox1.Column = WorksheetFunction.Transpose(ODCData)

Range("AA1") = ""
ListBox1.ListIndex = -1
End Sub

View Replies!   View Related
Edit UserForm Label Caption On Double Click
i've got a form that shows employee data in labels, and i'd like the user to be able to double click a label to change it (using a pop-up form). is it possible to get the pop-up to show after a double click instead of a single click?

View Replies!   View Related
Before Double Click Event Procedure For Multiple Sheets
I have a calendar userform set as Userform1 and I would like it to pop up upon double clicking in two different ranges 'date' which is on sheet 1 and 'dates' which is on sheet 4.

So far I have this code in Thisworkbook, which works perfectly for Sheet 1, but I get the following error on Sheet 4: Run time error '1004': Methed 'intersect of object'_global' failed.

Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
If Intersect(Target, Sheet1.Range("date")) Is Nothing Then Exit Sub
Exit Sub
If Intersect(taregt, Sheet4.Range("date2")) Is Nothing Then Exit Sub
UserForm1.Show .............................

View Replies!   View Related
Before Double Click Event Of Worksheet Created By Program
My program(which is an add-in, or will be when I've finished writing it) creates a new worksheet called "Groups Summary" I would like this sheet to be locked so that the user can not modify anything on it. I would also like that if they double click a cell this will launch a userform if based on certain conditions.

I believe this code would have to go in the worksheet itself, so the question is how do I get the macro to enter code into a worksheet that it creates?

Is there a way to write it in a standard module and then automatically copy it when the worksheet is created?

View Replies!   View Related
Force Cells To Recalculate (simulate Double Click)
I have an interesting question for everybody here. Let me see how to best explain it.

I start in the code making sure column Action Plan completion has a value in it. Copying in the issue modified column if neccesary.

'Back fill last modified
'I need to start with the first data row (3) and the action plan completion column
Let intcurrentrow = 3
Let intcurrentcol = intactionplancompletion
Do Until intcurrentrow > intmaxrow
If Cells(intcurrentrow, intcurrentcol).Value = "" Then
Let Cells(intcurrentrow, intcurrentcol).Value = Cells(intcurrentrow, intissuemodified).Value
'Need to ensure that everything is formatted as a date
Let Cells(intcurrentrow, intcurrentcol).NumberFormat = "m/d/yy h:mm AM/PM"
End If
Let intcurrentrow = intcurrentrow + 1

Later, I place this formula in a given cell.

=If(I9="Open-Remediated",M9-K9, If(I9="Closed-Remediated and Validated",M9-K9,"" ))

The info I copied above is placed into the column K.

When I run the macro, the cell formula outputs "#value".

However, if I go double-click then enter the cell calculates just fine.

I've tried excels overall recalculate function, but that doesn't change this.

Does anybody know how to simulate a double-click on a cell?

View Replies!   View Related
Userform: Delete All Content Through Double Click But Not The Highlighted Line
I have a worksheet in whichs Column A Cells , there is corresponding string content in Col. Z. Some cells of column Z contain of many lines (up to 100 line) which i want to reduce to one. I want to select one line through double clicking in the listbox of the userform and all other lines should be deleted and only the clicked one should remain. Code should then jump to the next non empty Z cell.

Columns B, C, D, E, F, G and H should also be shown in the userform and they should be live editable. I have attached and example file with userform and example data.

View Replies!   View Related
Move Cursor From To Cell B After Click On Cell A
exist any function that do following?

I am on the row 100 in column G. I had a freeze the first row where i have hypertext and other function. I want add here (in the 1. row) something like hypertext, but i want to stay in the row where i was.

When i am on row 100 in column G and i want to create function which move my cursor to column W but in the same row (row 100 in this case).

Next time i will be in row 154 and i will want to move my cursor again in column W and use this same hypertext/function or what.

View Replies!   View Related
How To Get A Userform By Double Clicking A Cell
how to get a userform by double clicking a cell.

I have created a userform, (my first one)-very simple form, i have created a massive textbox, so when i doubleclick a cell in Sheet 1, userform pops up and I can write comments.

I am not sure how to write a code for this? I know it will have Private Sub Doubleclick, not sure on the rest?

View Replies!   View Related
Copyright © 2005-08, All rights reserved