Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 61
Default macro copy/paste data from multiple cells to multiple cells

I am trying to copy and past date from multiple cells on one sheet to
multiple cells on another sheet. For example A1,B1 and C1 (sheet x) to D1
(sheet y) and F1,G1 (sheet) to P1 (sheet y). I am allowed to have only one
macro and the data has to be copied and populated at the same time. Is there
an easy way to do this.

Any help is greatly appreciated
Thanks

This is what I have so far but it gives me error message

Sub SubmitAll()
Dim ActualSheet As String
Dim Target1 As String
Target1 = Range("H1").Value
X (Target1)
Dim Target2 As String
Target2 = Range("M1").Value2
Y (Target2)
End Sub
_______________________________________________
Sub X(pos As String)
Dim Text1 As String
Range("H1").Select
Text1 = Range("H2").Value + Range("H3").Value + Range("H4").Value
Sheets("User Admin Form").Select
Range(pos).Value = Text1
AutoFit
End Sub
____________________________________
Sub Y(pos As String)
Dim Text1 As String
Range("M1").Select
Text1 = Range("M2").Value + Range("M3").Value + Range("M4").Value
Dim Text1 As String
Sheets("ActiveSheet.Name").Visible = 0
Sheets("User Admin Form").Select
Range(pos).Value = Text1
AutoFit
End Sub


Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
taking data from multiple cells and displaying in one cell djarcadian Excel Discussion (Misc queries) 2 May 30th 06 09:31 PM
checking that cells have a value before the workbook will close kcdonaldson Excel Worksheet Functions 8 December 5th 05 05:57 PM
Help PLEASE! Not sure what answer is: Match? Index? Other? baz Excel Worksheet Functions 7 September 3rd 05 03:47 PM
Reference multiple cells in if statement PAR Excel Worksheet Functions 1 June 10th 05 06:28 AM
Combining data (numeric format) in multiple cells into one cell (t GNAC SID Excel Discussion (Misc queries) 2 February 7th 05 05:09 PM


All times are GMT +1. The time now is 09:17 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"