krunal123

Board Regular
Joined
Jun 26, 2020
Messages
177
Office Version
  1. 365
  2. 2019
  3. 2016
Platform
  1. Windows
Query.jpg


WE NEED DATA TRANSFER TO TABLE AND EASY DATA ENTRY ........... SO I WAS FAILLED...
I Don't know how to write vba coding As per my Question

DATA Range : J7:MJ
Table Range : C7:C24
 

Excel Facts

Select all contiguous cells
Pressing Ctrl+* (asterisk) will select the "current region" - all contiguous cells in all directions.
I could give you 3 lines of code that do the job, but my suggestion is that you record your own macro while:
-start recording the macro
-select the input area (G7:M7?) and Copy its content
-select the first free line in column C
-execute paste-special /Values only
-press the Esc key
-select G7
-stop recording the macro
Then if publish the code we will make the modification to fill not that specific row but "the first available"

To learn how recording a macro: Quick start: Create a macro - Microsoft Support
 
Upvote 0
I could give you 3 lines of code that do the job, but my suggestion is that you record your own macro while:
-start recording the macro
-select the input area (G7:M7?) and Copy its content
-select the first free line in column C
-execute paste-special /Values only
-press the Esc key
-select G7
-stop recording the macro
Then if publish the code we will make the modification to fill not that specific row but "the first available"

To learn how recording a macro: Quick start: Create a macro - Microsoft Support
sir i was also try but not working properly, copy paste after going to next row ............ so this code is not working
 
Upvote 0
Ok, you are not interested in learning.
So try
VBA Code:
Sub LazyMan()
Range("C25").End(xlUp).Offset(1, 9).Resize(1, 4).Value = Range("J7:M7").Value
End Sub
Link it to your button
 
Upvote 0
Ok, you are not interested in learning.
So try
VBA Code:
Sub LazyMan()
Range("C25").End(xlUp).Offset(1, 9).Resize(1, 4).Value = Range("J7:M7").Value
End Sub
Link it to your button
Thanks for the Big help....
 
Upvote 0
Thank you for the feedback (but next time believe me and follow my suggestions, you'll learn more than by copying a ready-made macro ;))
 
Upvote 0

Forum statistics

Threads
1,223,884
Messages
6,175,175
Members
452,615
Latest member
bogeys2birdies

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top