$$Excel-Macros$$ Getting VBA Macros to work when users have a High Macro Security and have VB as a trusted publisher

2009-03-25 Thread RBoyle

I'm currently developing an excel spreadsheet that uses vba macros to
print and email the ms excel workbook.

Throughout our organization, due to other applications w/n the
organization, all of our users have their Macro Security settings set
to High and VB as a trusted publisher.  Becasue of this my macros are
disabled when i go to run them via the ms excel workbook.

If I placed the MS Excel workbook on my Sharepoint 03 server, created
a certificate using the Microsoft 2003 Office Resource Kit by running
the Selfcert.exe file and wrapped it up by creating a link to that
file on my SharePoint intranet would that work for the 300 users that
have their security settings set up this way and cant change them
becasue of other applications etc.

Thanks everyone for your help -- if this is not going to work, does
anyone have any suggestions on a work around i could have for our
current setup.

Thanks.

Ryan

--~--~-~--~~~---~--~~
-
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: "Next" error

2009-03-25 Thread lingesh p
Hi,

Does anybody have an ppt presentation on introduction to excel 2003. i have
prepared one but its not that effective. can somebody help me by mailing me
the ppt if u have with u .


Regards Lingesh

--~--~-~--~~~---~--~~
-
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$$ $$Excel-2003$$

2009-03-25 Thread lingesh p
Hi

I'm looking for a ppt presentation on "introduction to excel 2003". is there
any one who can help me in this regard. if any one have an ppt on this can
mail me across or guide me to the site where i can download it.

Thanks for the strain and stress

Regards... Lingesh

--~--~-~--~~~---~--~~
-
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: "Next" error

2009-03-25 Thread suresh k
Hi Ashish,

Thanks for your reply,

This code is working fine, but if I enter value apart from "bp" all the
sheets should be protected. Please let me know the code for this.


On Tue, Mar 24, 2009 at 9:42 PM, Ashish Jain <26may.1...@gmail.com> wrote:

>
> Hi Suresh,
>
> Remove the 8th line from your macro .i.e. "Next". It's not required.
> Here is modified code which is shorter and more readable than before.
>
> Tip: Always indent your program, it increase readability and hence
> error evaluations.
>
> Private Sub ok_Click()
>Dim a As Integer
>a = Val(text1.Text)
>
>If a = bp Then
>Application.ActiveSheet.Unprotect
>ActiveWorkbook.Unprotect
>UserForm1.Hide
>End If
>
>If a >= 2 Then
>'Protects ALL worksheets
>ActiveWorkbook.Protect
>For Each shts In ThisWorkbook.Worksheets
>  shts.Protect
>Next
>End If
> End Sub
>
> .
> .
> .
> .
> .
> For more tips, tricks, downloads and problem solutions: visit -->
> http://www.excelitems.com
> 
> Regards
> *Ashish **Jain*
> Analyst, CSC Australia
> Microsoft Certified Application (Excel) Specialist
> Technical Trainer - Excel and VBA
> Author -> www.excelitems.com
> +91--40-48-43
>
> -
>
> -
>
> On Mar 24, 8:34 pm, suresh k  wrote:
> > Hi All,
> >
> > Can anyone check whether below codes are correct or not.
> > I am getting error message while i run this code.
> >
> > Private Sub ok_Click()
> > Dim a As Integer
> > a = Val(text1.Text)
> >
> > If a = bp Then
> > Application.ActiveSheet.Unprotect
> > ActiveWorkbook.Unprotect
> > UserForm1.Hide
> > Next
> > End If
> >
> > If a > 2 Then
> > 'Protects ALL worksheets
> > ActiveWorkbook.Protect
> > For Each shts In ThisWorkbook.Worksheets
> > shts.Protect
> > Next
> > End If
> >
> > If a = 0 Then
> > ActiveWorkbook.Protect
> > For Each shts In ThisWorkbook.Worksheets
> > shts.Protect
> > Next
> > End If
> >
> > End Sub
> >
>

--~--~-~--~~~---~--~~
-
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: $$Excel-2003$$

2009-03-25 Thread Ashish Pradhan

Hi

See if this helps

http://134.198.33.115/webworks/Excel.05.ppt


Ashish

On Wed, Mar 25, 2009 at 10:44 AM, lingesh p  wrote:
> Hi
>
> I'm looking for a ppt presentation on "introduction to excel 2003". is there
> any one who can help me in this regard. if any one have an ppt on this can
> mail me across or guide me to the site where i can download it.
>
> Thanks for the strain and stress
>
> Regards... Lingesh
> >
>

--~--~-~--~~~---~--~~
-
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: Excel Problem

2009-03-25 Thread Luke Tovey
2009/3/23 Puzzled bkm...@aol.com

>
> Does anyone know how to have excel automatically do this without
> having to recopy the equations?
>
Didn't see this answered, but have you ensured that the Automatic Recalc
option is enabled in the Excel preferences?

Tools -> Options -> Calculation Tab (In the calculation section, ensure the
Automatic radio button is turned on)

Sorry if you've already done that ... it's caught me out before

Luke

--~--~-~--~~~---~--~~
-
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$$ Help required Colour on Rows and Column

2009-03-25 Thread Sachin Shukla
Dear All,

Please help me on said subjects . I attached sheet for same problem.

Thanks in Advance


Sachin Shukla
Business Analyst
New Delhi

--~--~-~--~~~---~--~~
-
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
-
-~--~~~~--~~--~--~---



Colour.xls
Description: MS-Excel spreadsheet


$$Excel-Macros$$ count number of occupied cells in every row

2009-03-25 Thread xxx

Hi all,
I need some help since i an beginner in vba programming
I have say an excel table as below:

1 2 3 4 5
2 3 4 5 6 6 78 8 9
hdg dg gdh gj
fsf
sf sfs sfs sf

in this table I have to count number of occupied cells in every row

in first row the result should be 5
In second row: 9
third row:  4
fourth row : 1
and in fifth : 4

Thank you for any help

--~--~-~--~~~---~--~~
-
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$$ VBA FOR VISIBLE CELLS

2009-03-25 Thread wannieb

What I am trying to achieve is if row in column has a zero or error
then hide row, which is the easy part and I have managed to do that,
the issue is I have got it to ignore blanks which I want to happen,
however the finished product doesn't look right when this happens as
more than one blank row is next to each other. I want to put some code
in so that it looks at the visible cells in the column and if a blank
is next to a blank then hide one of them

COLUMN
5
5
3
0
0

0
1

0

0
0
1

When the script I got at moment runs the result is:

COLUMN
5
5
3

1

 <- want to hide this as well (but will only get this
happening when others are hidden
1


I did think of using other columns to flag blanks etc. The blanks
should always be on the same rows however I will never know if the
zeros will make two blanks visible next to each other.

Script so far--

Sub HideZeros()

k = Range( _
"DA" & Rows.Count).End(xlUp).Row
Range("BA7").Value = k

For i = 8 To Range( _
"DA" & Rows.Count).End(xlUp).Row
j = i - 1
If IsEmpty(Cells(i, 105).Value) Then
Cells(i, 1).EntireRow.Hidden = False


' THIS IS LATEST IDEA WHICH DIDN'T WORK AS j DOESN'T LOOK AT JUST
VISIBLE
'ElseIf IsEmpty(Cells(j, 105).Value) = SpecialCells(xlVisible(j,
105).Value) Then
' Cells(i, 1).EntireRow.Hidden = True


ElseIf Application.Sum(Cells(i, 105), Cells(i, 107)) = 0 Then
Cells(i, 1).EntireRow.Hidden = True
Else: On Error Resume Next
End If
Next

End Sub

Got any ideas?

--~--~-~--~~~---~--~~
-
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: Getting Run-time error 13 Type Mismatch by VBA Macro

2009-03-25 Thread xmux

How can i manage it with the If Selection.Cells(x, 8) ??? Can u please
explain?

Thanks

On 23 Mrz., 20:31, Tom Jeffries  wrote:
> An Alternative Solution:
> Public Function IsAcct(code As String) As Boolean
>     Dim Acct
>     Dim Found As Boolean
>
>     Acct = Array( _
>         "AD", "AE", "AF", "AG", "AI", "AL", "AM", "AN", "AO", _
>         "AQ", "AR", "AS", "AT", "AU", "AW", "AX", "AZ", "BA", _
>         "BB", "BD", "BE", "BF", "BG", "BH", "BI", "BJ", "BM", _
>         "BN", "BO", "BR", "BS", "BT", "BV", "BW", "BY", "BZ", _
>         "CA", "CC", "CD", "CF", "CG", "CH", "CI", "CK", "CL", _
>         "CM", "CN", "CO", "CR", "CS", "CU", "CV", "CX", "CY", _
>         "CZ", "DE", "DJ", "DK", "DM", "DO", "DZ", "EC", "EE", _
>         "EG", "EH", "ER", "ES", "ET", "FI", "FJ", "FK", "FM", _
>         "FO", "FR", "GA", "GB", "GD", "GE", "GF", "GG", "GH", _
>         "GI", "GL", "GM", "WS", "YE", "YT", "ZA", "ZM", "ZW")
>
>     code = StrConv(Trim(code), vbUpperCase) ' Upper-case no blanks
>     Found = False
>
>     For i = 0 To UBound(Acct)
>         If Acct(i) = code Then
>             Found = True
>             Exit For
>         End If
>     Next
>
>     IsAcct = Found
>
> End Function
>
>
>
> On Sun, Mar 22, 2009 at 6:54 PM, xmux  wrote:
>
> > Hi Everyone,
>
> > I am just checking a Cell with
>
> > If Selection.Cells(x, 8) <> _
> > "AD" Or "AE" Or "AF" Or "AG" Or "AI" Or "AL" Or "AM" Or "AN" Or "AO"
> > Or "AQ" Or "AR" Or "AS" Or "AT" Or "AU" Or _
> > "AW" Or "AX" Or "AZ" Or "BA" Or "BB" Or "BD" Or "BE" Or "BF" Or "BG"
> > Or "BH" Or "BI" Or "BJ" Or "BM" Or "BN" Or _
> > "BO" Or "BR" Or "BS" Or "BT" Or "BV" Or "BW" Or "BY" Or "BZ" Or "CA"
> > Or "CC" Or "CD" Or "CF" Or "CG" Or "CH" Or _
> > "CI" Or "CK" Or "CL" Or "CM" Or "CN" Or "CO" Or "CR" Or "CS" Or "CU"
> > Or "CV" Or "CX" Or "CY" Or "CZ" Or "DE" Or _
> > "DJ" Or "DK" Or "DM" Or "DO" Or "DZ" Or "EC" Or "EE" Or "EG" Or "EH"
> > Or "ER" Or "ES" Or "ET" Or "FI" Or "FJ" Or _
> > "FK" Or "FM" Or "FO" Or "FR" Or "GA" Or "GB" Or "GD" Or "GE" Or "GF"
> > Or "GG" Or "GH" Or "GI" Or "GL" Or "GM" Or _
> > "WS" Or "YE" Or "YT" Or "ZA" Or "ZM" Or "ZW" Then
> >  MsgBox "Account Name cannot be empty! " & "Place: Row: " & x & "
> > Column: 8"
> >    GoTo Einde
> >    End If
>
> > If i run the Macro i got the run time Error!
> > Anyone has any idea?
>
> > Thanks- Zitierten Text ausblenden -
>
> - Zitierten Text anzeigen -

--~--~-~--~~~---~--~~
-
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$$ VBA Code to Export Text files from Sheet

2009-03-25 Thread Anil Patel
Hiii...


Guys I have a worksheet with around 4 rows.. And I need a VBA code to
Export Each Row in a separate Text file, with specified delimiter . .

And all the files should be exported in a particular folder, Named on any of
particular cell in the row...

Thanks in advance.

Regards.
Anil.
--~--~-~--~~~---~--~~
-
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: Help required Colour on Rows and Column

2009-03-25 Thread Norman May
Sachin,

Attached is your solution.
It is done by using conditional formatting.

Regards,
Norman May

On Wed, Mar 25, 2009 at 6:47 AM, Sachin Shukla  wrote:

> Dear All,
>
> Please help me on said subjects . I attached sheet for same problem.
>
> Thanks in Advance
>
>
> Sachin Shukla
> Business Analyst
> New Delhi
>
> >
>

--~--~-~--~~~---~--~~
-
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
-
-~--~~~~--~~--~--~---



Colour(1).xls
Description: MS-Excel spreadsheet


$$Excel-Macros$$ Re: Help required Colour on Rows and Column

2009-03-25 Thread Anish Shrivastava
Hi Sachin,
It was very simple...Just use Conditional Format feature...

Attached is the file wid solution..

Thanks!!!
ANISH

On Wed, Mar 25, 2009 at 4:17 PM, Sachin Shukla  wrote:

> Dear All,
>
> Please help me on said subjects . I attached sheet for same problem.
>
> Thanks in Advance
>
>
> Sachin Shukla
> Business Analyst
> New Delhi
>
> >
>

--~--~-~--~~~---~--~~
-
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
-
-~--~~~~--~~--~--~---



Colour.xls
Description: MS-Excel spreadsheet


$$Excel-Macros$$ Re: VBA Code to Export Text files from Sheet

2009-03-25 Thread Anish Shrivastava
Hi Anil,
Do you mean to say, you want 4 text files...
And what do you mean by specified delimiter...

I can give you the code which wil seprate the rows in any number of files
but the file name would be same as file01, file02 file03 and so on

Please lemme know...if it's okay...

On Wed, Mar 25, 2009 at 5:57 PM, Anil Patel  wrote:

>Hiii...
>
>
> Guys I have a worksheet with around 4 rows.. And I need a VBA code to
> Export Each Row in a separate Text file, with specified delimiter . .
>
> And all the files should be exported in a particular folder, Named on any
> of particular cell in the row...
>
> Thanks in advance.
>
> Regards.
> Anil.
>
> >
>

--~--~-~--~~~---~--~~
-
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: count number of occupied cells in every row

2009-03-25 Thread Ashish Jain

Hi Lavanya

Use CountA function to solve your problem.

Assuming the data and formulas as below:

A BC D  E F G  H I
1 2 3 4=COUNTA
(A1:H1)Result would be 4
X M N12 32   za   =COUNTA
(A2:H2)Result would be 6
A 1 1 NX   Y  Z=COUNTA
(A3:H3)Result would be 7
PO  MN  =COUNTA
(A4:H4)Result would be 2

.
.
.
.
.
For more tips, tricks, downloads and problem solutions: visit -->
http://www.excelitems.com

Regards
*Ashish **Jain*
Analyst, CSC Australia
Microsoft Certified Application (Excel) Specialist
Technical Trainer - Excel and VBA
Author -> www.excelitems.com
+91--40-48-43
-
-
On Mar 25, 2:58 pm, xxx  wrote:
> Hi all,
> I need some help since i an beginner in vba programming
> I have say an excel table as below:
>
> 1 2 3 4 5
> 2 3 4 5 6 6 78 8 9
> hdg dg gdh gj
> fsf
> sf sfs sfs sf
>
> in this table I have to count number of occupied cells in every row
>
> in first row the result should be 5
> In second row: 9
> third row:  4
> fourth row : 1
> and in fifth : 4
>
> Thank you for any help
--~--~-~--~~~---~--~~
-
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: count number of occupied cells in every row

2009-03-25 Thread Paul Schreiner
The way you would do that using Excel functions would be
to use CountA (counts non-blank cells).
so, in VBA you can use:
Rowcnt = Application.worksheetfunction.counta(range(Cells(R,1),Cells(R,100))

 




From: xxx 
To: MS EXCEL AND VBA MACROS 
Sent: Wednesday, March 25, 2009 5:58:55 AM
Subject: $$Excel-Macros$$ count number of occupied cells in every row


Hi all,
I need some help since i an beginner in vba programming
I have say an excel table as below:

1 2 3 4 5
2 3 4 5 6 6 78 8 9
hdg dg gdh gj
fsf
sf sfs sfs sf

in this table I have to count number of occupied cells in every row

in first row the result should be 5
In second row: 9
third row:  4
fourth row : 1
and in fifth : 4

Thank you for any help


--~--~-~--~~~---~--~~
-
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: Help required Colour on Rows and Column

2009-03-25 Thread Ashish Jain

Hi,

I again request all group members to not provide the solutions
directly, please help the users by mentioning steps but don't provide
them with the solutions embedded in file. We've given liberty of
posting files, so that it'll be easy to understand the queries.

Let the world know that you knows. Let the world learn the way you've
learn.

Regards
Ashish Jain
Group Manager
.
.
.
.
.
For more tips, tricks, downloads and problem solutions: visit -->
http://www.excelitems.com

Regards
*Ashish **Jain*
Analyst, CSC Australia
Microsoft Certified Application (Excel) Specialist
Technical Trainer - Excel and VBA
Author -> www.excelitems.com
+91--40-48-43
-
-

On Mar 25, 6:25 pm, Anish Shrivastava  wrote:
> Hi Sachin,
> It was very simple...Just use Conditional Format feature...
>
> Attached is the file wid solution..
>
> Thanks!!!
> ANISH
>
> On Wed, Mar 25, 2009 at 4:17 PM, Sachin Shukla  wrote:
> > Dear All,
>
> > Please help me on said subjects . I attached sheet for same problem.
>
> > Thanks in Advance
>
> > Sachin Shukla
> > Business Analyst
> > New Delhi
>
>
>
>  Colour.xls
> 21KViewDownload
--~--~-~--~~~---~--~~
-
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: count number of occupied cells in every row

2009-03-25 Thread Salman Warsi
  PLz tell me how to get rid of these bulk of mails.


On Wed, 25 Mar 2009 Paul Schreiner wrote :
>The way you would do that using Excel functions would be
>to use CountA (counts non-blank cells).
>so, in VBA you can use:
>Rowcnt = Application.worksheetfunction.counta(range(Cells(R,1),Cells(R,100))
>
>
>
>
>
>
> From: xxx 
>To: MS EXCEL AND VBA MACROS 
>Sent: Wednesday, March 25, 2009 5:58:55 AM
>Subject: $$Excel-Macros$$ count number of occupied cells in every row
>
>
>Hi all,
>I need some help since i an beginner in vba programming
>I have say an excel table as below:
>
>1 2 3 4 5
>2 3 4 5 6 6 78 8 9
>hdg dg gdh gj
>fsf
>sf sfs sfs sf
>
>in this table I have to count number of occupied cells in every row
>
>in first row the result should be 5
>In second row: 9
>third row:  4
>fourth row : 1
>and in fifth : 4
>
>Thank you for any help
>
>
>>

--~--~-~--~~~---~--~~
-
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: count number of occupied cells in every row

2009-03-25 Thread xxx

Thank you ashish and paul

On Mar 25, 2:40 pm, Paul Schreiner  wrote:
> The way you would do that using Excel functions would be
> to use CountA (counts non-blank cells).
> so, in VBA you can use:
> Rowcnt = Application.worksheetfunction.counta(range(Cells(R,1),Cells(R,100))
>
>  
>
> 
> From: xxx 
> To: MS EXCEL AND VBA MACROS 
> Sent: Wednesday, March 25, 2009 5:58:55 AM
> Subject: $$Excel-Macros$$ count number of occupied cells in every row
>
> Hi all,
> I need some help since i an beginner in vba programming
> I have say an excel table as below:
>
> 1 2 3 4 5
> 2 3 4 5 6 6 78 8 9
> hdg dg gdh gj
> fsf
> sf sfs sfs sf
>
> in this table I have to count number of occupied cells in every row
>
> in first row the result should be 5
> In second row: 9
> third row:  4
> fourth row : 1
> and in fifth : 4
>
> Thank you for any help

--~--~-~--~~~---~--~~
-
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$$ Basketball Bracket

2009-03-25 Thread Jim Mc

Hi all,

I work on this spreadsheet a few days a week every year (During March
of course).  If I get enough of a response, I'll post it, but it
tracks 35 (Decided that was plenty) entries in a 64-team field.  (A
lot like NCAA basketball - Hmmm).

If I get enough of  response I'll post it.  I'll also accept
recommendations if you have any.  It has a couple macros, but not
password protected at all.

Cheers.

--~--~-~--~~~---~--~~
-
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$$ Error - "End If without block if"

2009-03-25 Thread suresh k
Hi All,

Can anyone help on this error. Below is the code.

Private Sub ok_Click()
Dim a As Integer
a = Val(text1.Text)

If a = bp Then
For Each shts In ThisWorkbook.Worksheets
shts.Unprotect
ActiveWorkbook.Unprotect
UserForm1.Hide
End If

If Not a Then

ActiveWorkbook.Protect
For Each shts In ThisWorkbook.Worksheets
shts.Protect
Next
End If

End Sub

--~--~-~--~~~---~--~~
-
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: Excel Problem

2009-03-25 Thread Puzzled

That box is alrady turned on.  I really don't know why it won't
calcluate.  I even changed the maximum iterations and maximum change
values but it still didn't solve the issue.  Any other words of
wisdom?

On Mar 25, 1:35 am, Luke Tovey  wrote:
> 2009/3/23 Puzzled bkm...@aol.com
>
>
>
> > Does anyone know how to have excel automatically do this without
> > having to recopy the equations?
>
> Didn't see this answered, but have you ensured that the Automatic Recalc
> option is enabled in the Excel preferences?
>
> Tools -> Options -> Calculation Tab (In the calculation section, ensure the
> Automatic radio button is turned on)
>
> Sorry if you've already done that ... it's caught me out before
>
> Luke

--~--~-~--~~~---~--~~
-
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: Error - "End If without block if"

2009-03-25 Thread Paul Schreiner
Your first For Each loop doesn't have it's own "Next" statement,
so it's using the one from your SECOND For Each loop.
That puts the EndIf statement outside of the loop, so it stands alone.

Also, FYI...
You're Hiding UserForm1 once for each sheet in the workbook.
Once should be enough I would think.

and... is the value of "a" True/False or 0/1 ?
If it is something else, then the "If Not a then" statement will be always 
result in 'true'.. but then again, maybe that's what you want.

Make sure you indent your code so it's easier to see your loops:

Private Sub ok_Click()
>Dim a As Integer
>a = Val(text1.Text)
>If a = bp Then
>>For Each shts In ThisWorkbook.Worksheets
>>>shts.Unprotect
>>>ActiveWorkbook.Unprotect
>>>UserForm1.Hide
>>NEXT ' Missing from Your code
>End If

>If Not a Then
>>ActiveWorkbook.Protect
>>For Each shts In ThisWorkbook.Worksheets
>>>shts.Protect
>>Next
>End If

End Sub

Paul



From: suresh k 
To: Excel group 
Sent: Wednesday, March 25, 2009 11:31:01 AM
Subject: $$Excel-Macros$$ Error - "End If without block if"

Hi All,

Can anyone help on this error. Below is the code.

Private Sub ok_Click()
Dim a As Integer
a = Val(text1.Text)

If a = bp Then
For Each shts In ThisWorkbook.Worksheets
shts.Unprotect
ActiveWorkbook.Unprotect
    UserForm1.Hide
End If

If Not a Then

ActiveWorkbook.Protect
For Each shts In ThisWorkbook.Worksheets
shts.Protect
Next
End If

End Sub



--~--~-~--~~~---~--~~
-
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: Getting Run-time error 13 Type Mismatch by VBA Macro

2009-03-25 Thread Tom Jeffries
Public Sub TEST()
For x = 1 To 5
If IsAcct(Cells(x, 8).Value) Then
MsgBox Cells(x, 8).Value & " is a valid account."
Else
MsgBox Cells(x, 8).Value & " is not a valid account."
End If
Next
End Sub


On Wed, Mar 25, 2009 at 8:27 AM, xmux  wrote:

>
> How can i manage it with the If Selection.Cells(x, 8) ??? Can u please
> explain?
>
> Thanks
>
> On 23 Mrz., 20:31, Tom Jeffries  wrote:
> > An Alternative Solution:
> > Public Function IsAcct(code As String) As Boolean
> > Dim Acct
> > Dim Found As Boolean
> >
> > Acct = Array( _
> > "AD", "AE", "AF", "AG", "AI", "AL", "AM", "AN", "AO", _
> > "AQ", "AR", "AS", "AT", "AU", "AW", "AX", "AZ", "BA", _
> > "BB", "BD", "BE", "BF", "BG", "BH", "BI", "BJ", "BM", _
> > "BN", "BO", "BR", "BS", "BT", "BV", "BW", "BY", "BZ", _
> > "CA", "CC", "CD", "CF", "CG", "CH", "CI", "CK", "CL", _
> > "CM", "CN", "CO", "CR", "CS", "CU", "CV", "CX", "CY", _
> > "CZ", "DE", "DJ", "DK", "DM", "DO", "DZ", "EC", "EE", _
> > "EG", "EH", "ER", "ES", "ET", "FI", "FJ", "FK", "FM", _
> > "FO", "FR", "GA", "GB", "GD", "GE", "GF", "GG", "GH", _
> > "GI", "GL", "GM", "WS", "YE", "YT", "ZA", "ZM", "ZW")
> >
> > code = StrConv(Trim(code), vbUpperCase) ' Upper-case no blanks
> > Found = False
> >
> > For i = 0 To UBound(Acct)
> > If Acct(i) = code Then
> > Found = True
> > Exit For
> > End If
> > Next
> >
> > IsAcct = Found
> >
> > End Function
> >
> >
> >
> > On Sun, Mar 22, 2009 at 6:54 PM, xmux  wrote:
> >
> > > Hi Everyone,
> >
> > > I am just checking a Cell with
> >
> > > If Selection.Cells(x, 8) <> _
> > > "AD" Or "AE" Or "AF" Or "AG" Or "AI" Or "AL" Or "AM" Or "AN" Or "AO"
> > > Or "AQ" Or "AR" Or "AS" Or "AT" Or "AU" Or _
> > > "AW" Or "AX" Or "AZ" Or "BA" Or "BB" Or "BD" Or "BE" Or "BF" Or "BG"
> > > Or "BH" Or "BI" Or "BJ" Or "BM" Or "BN" Or _
> > > "BO" Or "BR" Or "BS" Or "BT" Or "BV" Or "BW" Or "BY" Or "BZ" Or "CA"
> > > Or "CC" Or "CD" Or "CF" Or "CG" Or "CH" Or _
> > > "CI" Or "CK" Or "CL" Or "CM" Or "CN" Or "CO" Or "CR" Or "CS" Or "CU"
> > > Or "CV" Or "CX" Or "CY" Or "CZ" Or "DE" Or _
> > > "DJ" Or "DK" Or "DM" Or "DO" Or "DZ" Or "EC" Or "EE" Or "EG" Or "EH"
> > > Or "ER" Or "ES" Or "ET" Or "FI" Or "FJ" Or _
> > > "FK" Or "FM" Or "FO" Or "FR" Or "GA" Or "GB" Or "GD" Or "GE" Or "GF"
> > > Or "GG" Or "GH" Or "GI" Or "GL" Or "GM" Or _
> > > "WS" Or "YE" Or "YT" Or "ZA" Or "ZM" Or "ZW" Then
> > >  MsgBox "Account Name cannot be empty! " & "Place: Row: " & x & "
> > > Column: 8"
> > >GoTo Einde
> > >End If
> >
> > > If i run the Macro i got the run time Error!
> > > Anyone has any idea?
> >
> > > Thanks- Zitierten Text ausblenden -
> >
> > - Zitierten Text anzeigen -
>
> >
>

--~--~-~--~~~---~--~~
-
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: count number of occupied cells in every row

2009-03-25 Thread H Upadhyay
chk this

Regards
Harish Upadhyay


On 3/25/09, xxx  wrote:
>
>
> Hi all,
> I need some help since i an beginner in vba programming
> I have say an excel table as below:
>
> 1 2 3 4 5
> 2 3 4 5 6 6 78 8 9
> hdg dg gdh gj
> fsf
> sf sfs sfs sf
>
> in this table I have to count number of occupied cells in every row
>
> in first row the result should be 5
> In second row: 9
> third row:  4
> fourth row : 1
> and in fifth : 4
>
> Thank you for any help
>
> >
>

--~--~-~--~~~---~--~~
-
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
-
-~--~~~~--~~--~--~---



Counta.xls
Description: MS-Excel spreadsheet


$$Excel-Macros$$ Cost cutting measures

2009-03-25 Thread mageshwaran jayaraman
Dear all,

Does anybody have presentations or list of tips for copst cutting mesures in a 
company. If yes, please forward me the same.
 
Thanx,
Mc



  Add more friends to your messenger and enjoy! Go to 
http://messenger.yahoo.com/invite/
--~--~-~--~~~---~--~~
-
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: Help required Colour on Rows and Column

2009-03-25 Thread jayendra gaurav
U can use conditional foramating.

On Wed, Mar 25, 2009 at 4:17 PM, Sachin Shukla  wrote:

> Dear All,
>
> Please help me on said subjects . I attached sheet for same problem.
>
> Thanks in Advance
>
>
> Sachin Shukla
> Business Analyst
> New Delhi
>
> >
>


-- 
J.Gaurav
Asst. Manager
Mahindra logistics
General Motor
Hallol Baroda
Cell - 9327348097

--~--~-~--~~~---~--~~
-
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: Convert PDF to Excel (-PIN-)

2009-03-25 Thread Mudassar Ramzan
Try the following.

PIN: 5080-8120-6873

Thanks & regards,

|| Mudassar Ramzan | MIS Officer | WorldCALL Telecom Ltd | 061- 814-3999 | 0321 
7325277 ||



  - Original Message - 
  From: Kuldeep Vashishtha 
  To: excel-macros@googlegroups.com 
  Sent: Monday, March 23, 2009 1:11 PM
  Subject: $$Excel-Macros$$ Re: Convert PDF to Excel


  Dear All

   

  Use below mentioned link

   

  http://rapidshare.com/files/189830453/Able2Extract_Professional_v6.0.0.0.rar

   

  not required PIN no. checked by me.

   

  If any query mark mail me.

   

  Thanks & Regards

  Kuldeep

   


--

  From: excel-macros@googlegroups.com [mailto:excel-mac...@googlegroups.com] On 
Behalf Of prabhakar jain
  Sent: Sunday, March 22, 2009 11:35 PM
  To: excel-macros@googlegroups.com
  Subject: $$Excel-Macros$$ Re: Convert PDF to Excel

   

   

  Use below mentioned link : 

   

  http://www.convertpdftoword.net/Default.aspx

  On Sat, Mar 21, 2009 at 3:42 PM, Pranav nadkarni  
wrote:

  Hi kamal

   

  Do u have the application for converting pdf into MS word..?

   

  if yes, i would be obliged to recieve the software from u...

   

   

  regds

  pranav

   




  -- 
  Prabhakar Jain 
  Mumbai




  


--~--~-~--~~~---~--~~
-
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
-
-~--~~~~--~~--~--~---