$$Excel-Macros$$ Re: paste multiple ranges in vba excel 2010

2013-11-17 Thread cristian paduraru
*To Basole,*

I have tested Your Improved code and them working fine. I escape by the 
action of modifying the code every time before I wanted to  apply on 
different values.
Thank You Basole for Your Time.
Iou saved-me of a lot of extra-work.
All best wishes!




vineri, 15 noiembrie 2013, 05:34:56 UTC+2, Basole a scris:

 Dear Cristian,I do not know if this is exactly what I did, I did some 
 change on your code then try this:


 Sub Rutina_5_zile()
 Application.ScreenUpdating = False
 Dim x As Long
 UsedRow = Worksheets(1).Cells.Find(What:=*, SearchOrder:=xlRows, 
 SearchDirection:=xlPrevious, LookIn:=xlFormulas).Row
 For x = 1 To UsedRow
   Cells(x + 4, C).Copy
   Worksheets(1).Cells(Rows.count, D).End(xlUp).Offset(5, 
 0).PasteSpecial xlPasteValues
 Next x
 Application.ScreenUpdating = True
 Application.CutCopyMode = False
   'MsgBox UsedRow
 End Sub

 'Basole.





 Em quarta-feira, 13 de novembro de 2013 04h14min03s UTC-2, cristian 
 paduraru escreveu:

 Hello to You all,



 I encountered following issue:
 I want to copy multiple ranges and paste to it in the specific ranges. I 
 will send you down the vba code:

 Sub seldate()

 Range(F10).Select

 Application.CutCopyMode = False

 ActiveCell.FormulaR1C1 = 1/1/2011

 Range(F11).Select

 ActiveCell.FormulaR1C1 = =R[-1]C+1

 Range(F11).Select

 Selection.Copy

 Range(F12:F41).Select

 ActiveSheet.Paste

 Range(G12,G17,G22).Select

  Selection.copy

 Range(H12,H17,H22).Select

 Activesheet.Paste
 End Sub

 Well, the vba send an error occur in multiple paste.
 Thank You



-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups MS 
EXCEL AND VBA MACROS group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/groups/opt_out.


$$Excel-Macros$$ Re: paste multiple ranges in vba excel 2010

2013-11-17 Thread Basole
ok Cristian, not at all. 

tks, 
Basole.




Em quarta-feira, 13 de novembro de 2013 04h14min03s UTC-2, cristian 
paduraru escreveu:

 Hello to You all,



 I encountered following issue:
 I want to copy multiple ranges and paste to it in the specific ranges. I 
 will send you down the vba code:

 Sub seldate()

 Range(F10).Select

 Application.CutCopyMode = False

 ActiveCell.FormulaR1C1 = 1/1/2011

 Range(F11).Select

 ActiveCell.FormulaR1C1 = =R[-1]C+1

 Range(F11).Select

 Selection.Copy

 Range(F12:F41).Select

 ActiveSheet.Paste

 Range(G12,G17,G22).Select

  Selection.copy

 Range(H12,H17,H22).Select

 Activesheet.Paste
 End Sub

 Well, the vba send an error occur in multiple paste.
 Thank You


-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups MS 
EXCEL AND VBA MACROS group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/groups/opt_out.


Re: $$Excel-Macros$$ Date format_Not in Proper

2013-11-17 Thread Rajan sharma
Hi, Try using below:

Sub prafu()
For Each x In Range(A1:A9000)
x.Value = Format(x.Value)
x.Value = Format(x.Value, dd-mm- hh:mm)
Next x
End Sub






With warm regards,
Rajan Sharma



On Mon, Nov 18, 2013 at 12:23 PM, Prafull Jadhav
prafulltjad...@gmail.comwrote:

 Dear All,

 Good Afternoon !
 I have one small query regarding date format .
 Daily i am getting data from region and it contain six month or more then
 six month data .
 each time i have to take a lot of time to correct it in proper format.
 I have made macro for the same but it is also not working
 i am attaching data and macro also
 Please resolve the same so i can save my big time
 Appreciate cooperation expected from you

 Regards,
 Prafull Jadhav
 9920553518

 --
 Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
 =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
 https://www.facebook.com/discussexcel

 FORUM RULES

 1) Use concise, accurate thread titles. Poor thread titles, like Please
 Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
 will not get quick attention or may not be answered.
 2) Don't post a question in the thread of another member.
 3) Don't post questions regarding breaking or bypassing any security
 measure.
 4) Acknowledge the responses you receive, good or bad.
 5) Jobs posting is not allowed.
 6) Sharing copyrighted material and their links is not allowed.

 NOTE : Don't ever post confidential data in a workbook. Forum owners and
 members are not responsible for any loss.
 ---
 You received this message because you are subscribed to the Google Groups
 MS EXCEL AND VBA MACROS group.
 To unsubscribe from this group and stop receiving emails from it, send an
 email to excel-macros+unsubscr...@googlegroups.com.
 To post to this group, send email to excel-macros@googlegroups.com.
 Visit this group at http://groups.google.com/group/excel-macros.
 For more options, visit https://groups.google.com/groups/opt_out.


-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups MS 
EXCEL AND VBA MACROS group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/groups/opt_out.


$$Excel-Macros$$ Re: [XL-VBA Clinic] Date format_Not in Proper

2013-11-17 Thread Prafull Jadhav
Hi Sir,

Thanks for Reply..

I have try this but result is coming wrong ...as out put showing jan and
Feb month also ..

data is contain from April to Nov ..



Regards,
Prafull Jadhav
9920553518


On Mon, Nov 18, 2013 at 1:02 PM, saurabh kumar
saurabhkumar8...@gmail.comwrote:

 Hi Prafull,

 Please try below.


 *Sub change_date_Format()*
 Dim r As Range
 Dim cell As Range
 Dim i As Long
 Dim l As String
 i = 1
 With ActiveWorkbook.Worksheets(Sheet1)
 Set r = .Range(A65536).End(xlUp)
 On Error Resume Next
 For Each cell In .Range(A1:A  r.Row)
 l = Format(cell.Value, dd/mm/)
 .Range(B  i).Value = l
 i = i + 1
 Next cell
 On Error GoTo 0
 End With
 End Sub




 On Mon, Nov 18, 2013 at 12:23 PM, Prafull Jadhav prafulltjad...@gmail.com
  wrote:

 Dear All,

 Good Afternoon !
 I have one small query regarding date format .
 Daily i am getting data from region and it contain six month or more then
 six month data .
 each time i have to take a lot of time to correct it in proper format.
 I have made macro for the same but it is also not working
 i am attaching data and macro also
 Please resolve the same so i can save my big time
 Appreciate cooperation expected from you

 Regards,
 Prafull Jadhav
 9920553518

 --

 --
 To post to this group, send email:
 excelvbacli...@googlegroups.com
 To unsubscribe from this group, send email
 excelvbaclinic+unsubscr...@googlegroups.com

 For more options, visit this group at
 http://groups.google.com/group/excelvbaclinic?hl=en?hl=en
 ---
 You received this message because you are subscribed to the Google Groups
 Excelvbaclinic group.
 To unsubscribe from this group and stop receiving emails from it, send an
 email to excelvbaclinic+unsubscr...@googlegroups.com.
 For more options, visit https://groups.google.com/groups/opt_out.




 --
 Regards
 Saurabh Kumar
 9540856210

 --

 --
 To post to this group, send email:
 excelvbacli...@googlegroups.com
 To unsubscribe from this group, send email
 excelvbaclinic+unsubscr...@googlegroups.com

 For more options, visit this group at
 http://groups.google.com/group/excelvbaclinic?hl=en?hl=en
 ---
 You received this message because you are subscribed to the Google Groups
 Excelvbaclinic group.
 To unsubscribe from this group and stop receiving emails from it, send an
 email to excelvbaclinic+unsubscr...@googlegroups.com.
 For more options, visit https://groups.google.com/groups/opt_out.


-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups MS 
EXCEL AND VBA MACROS group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/groups/opt_out.


Re: $$Excel-Macros$$ Date format_Not in Proper

2013-11-17 Thread Prafull Jadhav
DEAR RAJAN SIR,

thanks for reply...
but output showing jan and  feb month also after running macro .


Regards,
Prafull Jadhav
9920553518


On Mon, Nov 18, 2013 at 12:32 PM, Rajan sharma rajansharma9...@gmail.comwrote:

 Hi, Try using below:

 Sub prafu()
 For Each x In Range(A1:A9000)
 x.Value = Format(x.Value)
 x.Value = Format(x.Value, dd-mm- hh:mm)
 Next x
 End Sub






 With warm regards,
 Rajan Sharma



 On Mon, Nov 18, 2013 at 12:23 PM, Prafull Jadhav prafulltjad...@gmail.com
  wrote:

 Dear All,

 Good Afternoon !
 I have one small query regarding date format .
 Daily i am getting data from region and it contain six month or more then
 six month data .
 each time i have to take a lot of time to correct it in proper format.
 I have made macro for the same but it is also not working
 i am attaching data and macro also
 Please resolve the same so i can save my big time
 Appreciate cooperation expected from you

 Regards,
 Prafull Jadhav
 9920553518

 --
 Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
 =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
 https://www.facebook.com/discussexcel

 FORUM RULES

 1) Use concise, accurate thread titles. Poor thread titles, like Please
 Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
 will not get quick attention or may not be answered.
 2) Don't post a question in the thread of another member.
 3) Don't post questions regarding breaking or bypassing any security
 measure.
 4) Acknowledge the responses you receive, good or bad.
 5) Jobs posting is not allowed.
 6) Sharing copyrighted material and their links is not allowed.

 NOTE : Don't ever post confidential data in a workbook. Forum owners and
 members are not responsible for any loss.
 ---
 You received this message because you are subscribed to the Google Groups
 MS EXCEL AND VBA MACROS group.
 To unsubscribe from this group and stop receiving emails from it, send an
 email to excel-macros+unsubscr...@googlegroups.com.
 To post to this group, send email to excel-macros@googlegroups.com.
 Visit this group at http://groups.google.com/group/excel-macros.
 For more options, visit https://groups.google.com/groups/opt_out.


  --
 Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
 =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
 https://www.facebook.com/discussexcel

 FORUM RULES

 1) Use concise, accurate thread titles. Poor thread titles, like Please
 Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
 will not get quick attention or may not be answered.
 2) Don't post a question in the thread of another member.
 3) Don't post questions regarding breaking or bypassing any security
 measure.
 4) Acknowledge the responses you receive, good or bad.
 5) Jobs posting is not allowed.
 6) Sharing copyrighted material and their links is not allowed.

 NOTE : Don't ever post confidential data in a workbook. Forum owners and
 members are not responsible for any loss.
 ---
 You received this message because you are subscribed to the Google Groups
 MS EXCEL AND VBA MACROS group.
 To unsubscribe from this group and stop receiving emails from it, send an
 email to excel-macros+unsubscr...@googlegroups.com.
 To post to this group, send email to excel-macros@googlegroups.com.
 Visit this group at http://groups.google.com/group/excel-macros.
 For more options, visit https://groups.google.com/groups/opt_out.


-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups MS 
EXCEL AND VBA MACROS group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/groups/opt_out.