Change 16 to 15
On 05-Jun-2016 3:50 AM, "Laura Wheaton-Werle" <
la...@doublewcommunications.com> wrote:
> I've created a simple VBA code that copies a line of code to a specified
> range.
>
> Sub PowerOfOne_Report()
>
> ActiveWorkbook.Worksheets("PowerOfOne").Rows("3:3").Copy
> ActiveWorkbook.Worksheets("PowerOfOne").Rows("3:16").Select
> ActiveSheet.Paste
>
> End Sub
>
> HOWEVER, I need to change the "16" to a variable. Everything I try returns
> an error message. My current code looks like this:
>
> Sub PowerOfOne_Report()
>
> Dim m As Integer
>
> m = Application.WorksheetFunction.Count(C1, C100)
>
> ActiveWorkbook.Worksheets("PowerOfOne").Rows("3:3").Copy
> ActiveWorkbook.Worksheets("PowerOfOne").Rows("3:m").Select
> ActiveSheet.Paste
>
> End Sub
>
> I get a Type Mismatch error on the highlighted line of code.
>
> Additionally, there's a little more to the variable "m" than the function
> above, but every time I try to adjust it, I get an error message.
>
> - The COUNT needs to be performed on the "PALMS" worksheet (however,
> the PALMS worksheet is where the command button will be located, so,
> technically, that will be the active sheet).
> - I also need to add 2 to the total count.
>
> Can anyone helps me with this?
>
>
> Thanks,
>
> Laura
>
> --
> 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 https://groups.google.com/group/excel-macros.
> For more options, visit https://groups.google.com/d/optout.
>
--
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 https://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.
