$$Excel-Macros$$ Tab Strip or Multi page problem

2012-03-28 Thread Thomp
Was playing around with Tab Strip and Multi Page but on each every time I 
add a check box on the tab it disappears the minute I take in out of design 
mode..Anyone know what I am doing wrong here
 
thanks
Bill

-- 
FORUM RULES (986+ members already BANNED for violation)

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)  Cross-promotion of, or links to, forums competitive to this forum in 
signatures are prohibited. 

NOTE  : Don't ever post personal or confidential data in a workbook. Forum 
owners and members are not responsible for any loss.

--
To post to this group, send email to excel-macros@googlegroups.com


Re: $$Excel-Macros$$ Checkbox disappears when Macro Run

2012-01-31 Thread Thomp
Sorry ..late getting back to say that Don your example worked..thanks
for your help on this..

On Jan 30, 1:07 pm, dguillett1 dguille...@gmail.com wrote:
 UN tested but try

 Sub FilterDeleteColumnN()
 Application.ScreenUpdating=false
 with Range(N1:NRange(N  Rows.Count).End(xlUp).Row)
    .AutoFilter Field:=1, Criteria1:= 
    .offset(1).rows.delete
    .AutoFilter
 end with
 Application.ScreenUpdating=True
 end sub

 On Jan 30, 11:10 am, Sam Mathai Chacko samde...@gmail.com wrote:

  Try adding a line at the end of the code

  Application.ScreenUpdating=True

 Don Guillett
 SalesAid Software
 dguille...@gmail.com



 -Original Message-
 From: Thomp
 Sent: Monday, January 30, 2012 12:39 PM
 To: MS EXCEL AND VBA MACROS
 Subject: Re: $$Excel-Macros$$ Checkbox disappears when Macro Run

 Here is the code Sam..when I added your code line it eliminates all
 the lines not just those completed

 Sub FilterDeleteColumnF()
 Dim Lastrow As Long

 Range(N:N).AutoFilter Field:=1, Criteria1:= 
 Lastrow = Range(N  Rows.Count).End(xlUp).Row

 If Lastrow  3 Then Range(A3:A 
 Lastrow).SpecialCells(xlCellTypeVisible).EntireRow.Delete xlShiftUp

 ActiveSheet.AutoFilterMode = False

 On Jan 30, 11:10 am, Sam Mathai Chacko samde...@gmail.com wrote:
  Try adding a line at the end of the code

  Application.ScreenUpdating=True

  Regards,
  Sam Mathai Chacko

  On Mon, Jan 30, 2012 at 8:59 PM, Thomp williamth...@gmail.com wrote:
   I have this weird problem that whenever I run a macro I have the
   clears some data.. the checkbox control at the top
   disappears..Stranger still is if I drag the last row of data or copy
   and paste in a new row the checkbox reappears.. I have already tried
   changing the format control  to  the option of dont move or size with
   cells but that has no effect.

   The checkbox is from the control toolbox and is assigned a macro..just
   in case that makes a differenct..

   thanks in advance for any help on this

   --
   FORUM RULES (986+ members already BANNED for violation)

   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)  Cross-promotion of, or links to, forums competitive to this forum in
   signatures are prohibited.

   NOTE  : Don't ever post personal or confidential data in a workbook.
   Forum
   owners and members are not responsible for any loss.

   ---­
---
   To post to this group, send email to excel-macros@googlegroups.com

  --
  Sam Mathai Chacko- Hide quoted text -

  - Show quoted text -

 --
 FORUM RULES (986+ members already BANNED for violation)

 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)  Cross-promotion of, or links to, forums competitive to this forum in
 signatures are prohibited.

 NOTE  : Don't ever post personal or confidential data in a workbook. Forum
 owners and members are not responsible for any loss.

 ---­---
 To post to this group, send email to excel-macros@googlegroups.com- Hide 
 quoted text -

 - Show quoted text -

-- 
FORUM RULES (986+ members already BANNED for violation)

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)  Cross-promotion of, or links to, forums competitive to this forum in 
signatures are prohibited. 

NOTE  : Don't ever post personal or confidential data in a workbook. Forum 
owners and members are not responsible for any loss.

--
To post to this group, send email to excel-macros@googlegroups.com


$$Excel-Macros$$ Checkbox disappears when Macro Run

2012-01-30 Thread Thomp
I have this weird problem that whenever I run a macro I have the
clears some data.. the checkbox control at the top
disappears..Stranger still is if I drag the last row of data or copy
and paste in a new row the checkbox reappears.. I have already tried
changing the format control  to  the option of dont move or size with
cells but that has no effect.

The checkbox is from the control toolbox and is assigned a macro..just
in case that makes a differenct..

thanks in advance for any help on this

-- 
FORUM RULES (986+ members already BANNED for violation)

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)  Cross-promotion of, or links to, forums competitive to this forum in 
signatures are prohibited. 

NOTE  : Don't ever post personal or confidential data in a workbook. Forum 
owners and members are not responsible for any loss.

--
To post to this group, send email to excel-macros@googlegroups.com


Re: $$Excel-Macros$$ Checkbox disappears when Macro Run

2012-01-30 Thread Thomp
Here is the code Sam..when I added your code line it eliminates all
the lines not just those completed

Sub FilterDeleteColumnF()
Dim Lastrow As Long

Range(N:N).AutoFilter Field:=1, Criteria1:=þ
Lastrow = Range(N  Rows.Count).End(xlUp).Row

If Lastrow  3 Then Range(A3:A 
Lastrow).SpecialCells(xlCellTypeVisible).EntireRow.Delete xlShiftUp

ActiveSheet.AutoFilterMode = False


On Jan 30, 11:10 am, Sam Mathai Chacko samde...@gmail.com wrote:
 Try adding a line at the end of the code

 Application.ScreenUpdating=True

 Regards,
 Sam Mathai Chacko





 On Mon, Jan 30, 2012 at 8:59 PM, Thomp williamth...@gmail.com wrote:
  I have this weird problem that whenever I run a macro I have the
  clears some data.. the checkbox control at the top
  disappears..Stranger still is if I drag the last row of data or copy
  and paste in a new row the checkbox reappears.. I have already tried
  changing the format control  to  the option of dont move or size with
  cells but that has no effect.

  The checkbox is from the control toolbox and is assigned a macro..just
  in case that makes a differenct..

  thanks in advance for any help on this

  --
  FORUM RULES (986+ members already BANNED for violation)

  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)  Cross-promotion of, or links to, forums competitive to this forum in
  signatures are prohibited.

  NOTE  : Don't ever post personal or confidential data in a workbook. Forum
  owners and members are not responsible for any loss.

  ---­---
  To post to this group, send email to excel-macros@googlegroups.com

 --
 Sam Mathai Chacko- Hide quoted text -

 - Show quoted text -

-- 
FORUM RULES (986+ members already BANNED for violation)

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)  Cross-promotion of, or links to, forums competitive to this forum in 
signatures are prohibited. 

NOTE  : Don't ever post personal or confidential data in a workbook. Forum 
owners and members are not responsible for any loss.

--
To post to this group, send email to excel-macros@googlegroups.com


$$Excel-Macros$$ Copy none blank Cells

2009-04-17 Thread Thomp

I am trying to set up a macro that copies the non-blank cells( cells
with data in them) and then copies them to another spreadsheet where
in the first empty row.  The catch here is that I need the copying of
non-blank cells to start at row six as the first six rows have data in
them that I do not want to copy.

Any help on this would be great.

thanks,
Bill

--~--~-~--~~~---~--~~
-
Some important links for excel users:
1. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at 
http://www.excelitems.com
2. Excel tutorials at http://www.excel-macros.blogspot.com
3. Learn VBA Macros at http://www.vbamacros.blogspot.com
4. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 

To post to this group, send email to excel-macros@googlegroups.com
If you find any spam message in the group, please send an email to:
Ayush Jain  @ jainayus...@gmail.com or
Ashish Jain @ 26may.1...@gmail.com
-
-~--~~~~--~~--~--~---



$$Excel-Macros$$ Re: Copy none blank Cells

2009-04-17 Thread Thomp

Hi Paul..First thanks ...I am always amazed that people such as your
self are willing to give their time  genius to those of us who need
help.  The code almost works but for some reason it is not pasteing to
the first open row on the sheet it is copying to. It copies to like
row 30 and in fact if I repeat the macro it will copy again but it
copies down about 11 rows past the first open row of what was just
copied

In one of my earlier experiments I tried a manual paste to the right
spot but it sill wouldn't let me as it gave me the message that the
merged cells must be identical. I don't know if the fact that I am
using some merge cells on my spreadsheet is causing a problem or not.

thanks again
Bill

On Apr 17, 6:52 am, Paul Schreiner schreiner_p...@att.net wrote:
 There are several ways to do this...
 some take longer than others, but depending on how many rows are involved, it 
 may not matter.

 first of all,  are there any columns that ALWAYS have data?
 Are there column headers?

 Based on the information that I have (or lack thereof, lol) I came up with 
 this:

 Assuming:  the sheet name containing the data is:  Data_Sheet
 the sheet name the the data is copied TO is:  Copy_Sheet

 Option Explicit
 Sub CopyData()
     Dim R, C1, C2, MaxRow, MaxCol
     Dim CopyRow, CopyCnt, BlankCnt, blankFlag
     Sheets(Copy_Sheet).Select
     ActiveCell.SpecialCells(xlLastCell).Select ' Determines last used row in 
 sheet
     CopyRow = ActiveCell.Row
     Cells(CopyRow, 1).Select
     MaxRow = 65000  'Number of Rows to check
     MaxCol = 100    'Number of Columns to Check
     CopyCnt = 0
     BlankCnt = 0
     Application.ScreenUpdating = False
     For R = 7 To MaxRow
     blankFlag = True
     If (R Mod 100 = 0) Then Application.StatusBar = Checking Status:   
 R   of   MaxRow
     For C1 = 1 To MaxCol
     If (Sheets(Data_Sheet).Cells(R, C1)  X  X) Then
     CopyCnt = CopyCnt + 1
     BlankCnt = 0
     blankFlag = False
     CopyRow = CopyRow + 1
     For C2 = 1 To MaxCol
     Sheets(Copy_sheet).Cells(CopyRow, C2) = 
 Sheets(Data_Sheet).Cells(R, C2)
     Next C2
     Exit For
     End If
     Next C1
     If (blankFlag) Then
     BlankCnt = BlankCnt + 1
     If (BlankCnt = 100) Then Exit For  'Exits if 100 consecutive 
 blank rows
     End If
     Next R
     Cells(CopyRow, 1).Select
     MsgBox CopyCnt   Rows Copied
     Application.ScreenUpdating = True
     Application.StatusBar = False
 End Sub

 hope this helps,

 Paul

 
 From: Thomp williamth...@gmail.com
 To: MS EXCEL AND VBA MACROS excel-macros@googlegroups.com
 Sent: Thursday, April 16, 2009 4:09:15 PM
 Subject: $$Excel-Macros$$ Copy none blank Cells

 I am trying to set up a macro that copies the non-blank cells( cells
 with data in them) and then copies them to another spreadsheet where
 in the first empty row.  The catch here is that I need the copying of
 non-blank cells to start at row six as the first six rows have data in
 them that I do not want to copy.

 Any help on this would be great.

 thanks,
 Bill

--~--~-~--~~~---~--~~
-
Some important links for excel users:
1. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at 
http://www.excelitems.com
2. Excel tutorials at http://www.excel-macros.blogspot.com
3. Learn VBA Macros at http://www.vbamacros.blogspot.com
4. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 

To post to this group, send email to excel-macros@googlegroups.com
If you find any spam message in the group, please send an email to:
Ayush Jain  @ jainayus...@gmail.com or
Ashish Jain @ 26may.1...@gmail.com
-
-~--~~~~--~~--~--~---