Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default continuing code on another line?

i have the following code

With Target
If Not Intersect(.Cells
Range("$C$7:$E$7,$G$7:$I$7,$K$7:$M$7,$O$7:$Q$7,$S$ 7:$AC$7, _
$AE$7:$AG$7,$AI$7:$AK$7,$AM$7:$AO$7,$AQ$7:$AS$7,$A U$6:$AW$7
$AY$7:$BA$7, $BC$7:$BE$7, _
$BG$6:$BI$7, $BK$6:$BM$7, $BO$6:$BQ$7, $BS$6:$BU$7, $BW$7:$BY$7
$CA$7:$CC$7, _
$CE$7:$CG$7, $CI$7:$CK$7, $CM$7:$CO$7, $CQ$7:$CS$7, $CU$6:$CW$7
$CV$7:$DA$7, _
$DC$7:$DE$7, $DG$7:$DI$7, $DK$7:$DM$7, $DO$7:$DQ$7, $DS$3:$DU$5")) _
Is Nothing Then
Select Case .Address

Case "$C$7:$E$7"
'stanmore
Worksheets("3.data").Select
Worksheets("3.data").ComboBox1_DropButtonClick
Worksheets("3.data").ComboBox1.ListIndex = "21"
Worksheets("3.data").ComboBox1_Click
etc etc

and excel is complaining that the line starting with $AE$7 starts wit
an invalid character (even though I have the _ on the line before t
say it continues on the next line). Am i missing something

--
Message posted from http://www.ExcelForum.com

  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 11,272
Default continuing code on another line?

You need to add closing quotes and re-open them, like

If Not
Intersect(.Cells,Range("$C$7:$E$7,$G$7:$I$7,$K$7:$ M$7,$O$7:$Q$7,$S$7:$AC$7,"
& _
"$AE$7:$AG$7,$AI$7:$AK$7,$AM$7:$AO$7,$AQ$7:$AS$7,$ AU$6:$AW$7, $AY$7:$BA$7,
$BC$7:$BE$7, " & _

etc.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"neowok " wrote in message
...
i have the following code

With Target
If Not Intersect(.Cells,
Range("$C$7:$E$7,$G$7:$I$7,$K$7:$M$7,$O$7:$Q$7,$S$ 7:$AC$7, _
$AE$7:$AG$7,$AI$7:$AK$7,$AM$7:$AO$7,$AQ$7:$AS$7,$A U$6:$AW$7,
$AY$7:$BA$7, $BC$7:$BE$7, _
$BG$6:$BI$7, $BK$6:$BM$7, $BO$6:$BQ$7, $BS$6:$BU$7, $BW$7:$BY$7,
$CA$7:$CC$7, _
$CE$7:$CG$7, $CI$7:$CK$7, $CM$7:$CO$7, $CQ$7:$CS$7, $CU$6:$CW$7,
$CV$7:$DA$7, _
$DC$7:$DE$7, $DG$7:$DI$7, $DK$7:$DM$7, $DO$7:$DQ$7, $DS$3:$DU$5")) _
Is Nothing Then
Select Case .Address

Case "$C$7:$E$7"
'stanmore
Worksheets("3.data").Select
Worksheets("3.data").ComboBox1_DropButtonClick
Worksheets("3.data").ComboBox1.ListIndex = "21"
Worksheets("3.data").ComboBox1_Click
etc etc

and excel is complaining that the line starting with $AE$7 starts with
an invalid character (even though I have the _ on the line before to
say it continues on the next line). Am i missing something?


---
Message posted from http://www.ExcelForum.com/



  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default continuing code on another line?

thought i was forgetting a symbol somewhere

ive now changed it to

With Target
If Not Intersect(.Cells
Range("$C$7:$E$7,$G$7:$I$7,$K$7:$M$7,$O$7:$Q$7,$S$ 7:$AC$7," & _
"$AE$7:$AG$7,$AI$7:$AK$7,$AM$7:$AO$7,$AQ$7:$AS$7,$ AU$6:$AW$7
$AY$7:$BA$7, $BC$7:$BE$7," & _
"$BG$6:$BI$7, $BK$6:$BM$7, $BO$6:$BQ$7, $BS$6:$BU$7, $BW$7:$BY$7
$CA$7:$CC$7," & _
"$CE$7:$CG$7, $CI$7:$CK$7, $CM$7:$CO$7, $CQ$7:$CS$7, $CU$6:$CW$7
$CV$7:$DA$7," & _
"$DC$6:$DE$7, $DG$7:$DI$7, $DK$7:$DM$7, $DO$7:$DQ$7, $DS$3:$DU$5")) _
Is Nothing Then


however excel now complains that "method range of object _workshee
failed" and highlights that entire block in yellow, and im sure its no
the & _ causing it cos it still does it when i stick all that into
line hmmmmmm

--
Message posted from http://www.ExcelForum.com

  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 11,272
Default continuing code on another line?

It's the damn dollars mate.

With Target
If Not Intersect(.Cells, Range("C7:E7,G7:I7,K7:M7,O7:Q7,S7:AC7," & _
"AE7:AG7,AI7:AK7,AM7:AO7,AQ7:AS7,AU6:AW7,AY7:B A7, BC7:BE7," & _
"BG6:BI7, BK6:BM7, BO6:BQ7, BS6:BU7, BW7:BY7,CA7:CC7," & _
"CE7:CG7, CI7:CK7, CM7:CO7, CQ7:CS7, CU6:CW7,CV7:DA7," & _
"DC6:DE7, DG7:DI7, DK7:DM7, DO7:DQ7, DS3:DU5")) _
Is Nothing Then

works

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"neowok " wrote in message
...
thought i was forgetting a symbol somewhere

ive now changed it to

With Target
If Not Intersect(.Cells,
Range("$C$7:$E$7,$G$7:$I$7,$K$7:$M$7,$O$7:$Q$7,$S$ 7:$AC$7," & _
"$AE$7:$AG$7,$AI$7:$AK$7,$AM$7:$AO$7,$AQ$7:$AS$7,$ AU$6:$AW$7,
$AY$7:$BA$7, $BC$7:$BE$7," & _
"$BG$6:$BI$7, $BK$6:$BM$7, $BO$6:$BQ$7, $BS$6:$BU$7, $BW$7:$BY$7,
$CA$7:$CC$7," & _
"$CE$7:$CG$7, $CI$7:$CK$7, $CM$7:$CO$7, $CQ$7:$CS$7, $CU$6:$CW$7,
$CV$7:$DA$7," & _
"$DC$6:$DE$7, $DG$7:$DI$7, $DK$7:$DM$7, $DO$7:$DQ$7, $DS$3:$DU$5")) _
Is Nothing Then


however excel now complains that "method range of object _worksheet
failed" and highlights that entire block in yellow, and im sure its not
the & _ causing it cos it still does it when i stick all that into 1
line hmmmmmmm


---
Message posted from http://www.ExcelForum.com/



  #5   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default continuing code on another line?

it removes the error yes but without the dollars, it fails to recognis
it as the correct address possibly because the 'target' parameter o
selectionchange contains the dollars, but either way it fails t
recognise when those cells are selected unless the dollars are i
there.

damni

--
Message posted from http://www.ExcelForum.com



  #6   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 11,272
Default continuing code on another line?

Rubbish,<G. Cell A1 is Cell A1. Target will only contain the dollars if you
take the default address. You can just as easily see it with a column dollar
only, row dollar only, or neither.

I tested it and I can get an intersect on each of those cells are selected.
If you have a problem, it is something else.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"neowok " wrote in message
...
it removes the error yes but without the dollars, it fails to recognise
it as the correct address possibly because the 'target' parameter of
selectionchange contains the dollars, but either way it fails to
recognise when those cells are selected unless the dollars are in
there.

damnit


---
Message posted from http://www.ExcelForum.com/



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
Macro code to put series name next to individual line in line grap Otani Charts and Charting in Excel 3 February 23rd 10 07:24 PM
Continuing functions Tech_Wolf[_2_] Excel Discussion (Misc queries) 2 July 26th 09 09:16 PM
Continuing Macro Jase4now Excel Discussion (Misc queries) 5 May 20th 08 07:50 PM
Same code, different line Neil[_14_] Excel Programming 3 January 7th 04 08:38 AM
Continuing print code problem Stuart[_5_] Excel Programming 0 August 5th 03 06:54 PM


All times are GMT +1. The time now is 06:45 AM.

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

About Us

"It's about Microsoft Excel"