About Us

Muddled

Sorry,
OK
DG

"Don Guillett" wrote:

You are doing what is called "Hijacking". Start your OWN thread with a
suitable subject line and before/after examples of what you want.

--
Don Guillett
SalesAid Software

"Muddled" wrote in message
...
CP--- I Can't help you, but maybe you can help me. I want to move the
quote
number & name( 2 cells) on my "Quotes" Tab, to the Job number & Name Slots
on
my "Jobs" Tab.I have been able to move the data from one sheet to the
next,
however don't know how to make the quotes appear in the next available Job
#
column. Any insight??
DC
-

"CP" wrote:

Ok found alot of coding - but doesnt make any sense

Sub MoveRow()
Dim wsOrder As Worksheet
Dim wsData As Worksheet
Dim r As Long

Set wsOrder = Worksheets("OrderForm")
Set wsData = Worksheets("Data Entry")
r = wsOrder.Cells(Rows.Count, 1).End(xlUp).Row + 1

ActiveCell.EntireRow.Copy Destination:=wsOrder.Cells(r, 1)

End Sub

----

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 3 And Target.Column = 3 Then
'calculate criteria cell in case calculation mode is manual
Worksheets("ProductsList").Range("I3").Calculate
Worksheets("ProductsList").Range("Database") _
.AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Sheets("ProductsList").Range("I2:I3 "), _
CopyToRange:=Range("A6:G6"), Unique:=False
End If
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 7 And Target.Row 6 Then
If Cells(Target.Row, 1).Value < "" Then
Target.Value = "X"
MoveRow
'MsgBox "Row has been copied"
End If
End If
End Sub

Thread Tools	Search this Thread
Show Printable Version	Search this Thread: Advanced Search
Display Modes
Switch to Linear Mode Hybrid Mode Switch to Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
merging single worksheet files into a single workbook	DDK	Excel Discussion (Misc queries)	1	December 5th 06 05:25 PM
How to paste the 4 lines in a single row in excel?	lalitha	Excel Discussion (Misc queries)	1	July 27th 06 06:06 AM
Save a single worksheet in Excel as a single file.	Dakota	New Users to Excel	4	February 22nd 06 04:46 PM
two lines of text in a single row?	SteveB	Excel Discussion (Misc queries)	18	June 30th 05 05:09 PM
two lines of text in single row	SteveB	Excel Discussion (Misc queries)	2	May 17th 05 08:17 PM

Menu

About Us