Re: $$Excel-Macros$$ 2 Queirs, plz give tips

2010-10-20 Thread bhupendra

 Hi Sajid,

I hope the following would be helpful for you having Xl to Exe converter:
http://cpap.com.br/orlando/XLtoExeMore.asp

Best,
Bhupendra Chaudhari

On 10/21/2010 9:49 AM, SAJID MEMON wrote:

Dear Experts,

   1. Query:  Can I convert any xls file to 
exe? if yes plz give me tips.
   2. Query:  I have some data in a column, i 
want it shows in a combo box, through VBA how can we do?



awaiting your positive responce,


your friend
sajid memon


--
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip

2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com

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

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts 



--
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com

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

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts


Re: $$Excel-Macros$$ 2 Queirs, plz give tips

2010-10-20 Thread siti Vi
1
go to   http://www.exceltoexe.com/

2
instanciate a ComboBox (an ActiveX Control) on sheet
righ-click > Properties
set the property named ListFillRange =  Your Range address  for example  :
A2:A1001



On Thu, Oct 21, 2010 at 11:19 AM, SAJID MEMON wrote:

>  Dear Experts,
>
>1. Query:  Can I convert any xls file to exe? if
> yes plz give me tips.
>2. Query:  I have some data in a column, i want
> it shows in a combo box, through VBA how can we do?
>
>
> awaiting your positive responce,
>
>
> your friend
> sajid memon
>
>

-- 
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts


Re: $$Excel-Macros$$ Help on Graph

2010-10-20 Thread Shrinivas Shevde
Thanks Ajay and Vijaykumar,Shiv kumar
Both Option I can not use (Pivot Table and 0 values)
Is there any another option any setting
Shrinivas
On Wed, Oct 20, 2010 at 11:13 PM, P.VIJAYKUMAR  wrote:

> Dear Srinivas,
>
> Just keep zeros whereever there are no values.
>
>
> Regards,
> Vijaykumar
>
>  On Wed, Oct 20, 2010 at 12:17 PM, Shrinivas Shevde <
> shrinivas...@gmail.com> wrote:
>
>> Dear All,
>> Can Any one help me on graph ?
>> Thanks in advance.
>> --
>> Shrini
>>
>> --
>>
>> --
>> Some important links for excel users:
>> 1. Follow us on TWITTER for tips tricks and links :
>> http://twitter.com/exceldailytip
>> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
>> 3. Excel tutorials at http://www.excel-macros.blogspot.com
>> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
>> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>>
>> To post to this group, send email to excel-macros@googlegroups.com
>>
>> <><><><><><><><><><><><><><><><><><><><><><>
>> Like our page on facebook , Just follow below link
>>
>> http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts
>>
>
>
>
> --
>
>
>
>
>
>
>
>
>
> P.VIJAY KUMAR
>
> --
>
> --
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts
>



-- 
Shrini

-- 
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts


$$Excel-Macros$$ 2 Queirs, plz give tips

2010-10-20 Thread SAJID MEMON

Dear Experts,
 
   1. Query:  Can I convert any xls file to exe? if yes 
plz give me tips.
   2. Query:  I have some data in a column, i want it 
shows in a combo box, through VBA how can we do?
 
 
awaiting your positive responce,
 
 
your friend
sajid memon
 
  

-- 
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts


$$Excel-Macros$$ Finding student whose marks are improving over three consecutive tests

2010-10-20 Thread Vaaibhav
Hello

I have got sample data as follows:


Marks in a single subject
Student Class   Marks   Test
A   X   20  First
B   XI  25  First
C   V   12  First
A   X   25  Second
B   XI  23  Second
C   V   12  Second
D   VII 34  Second
A   X   75  Third
B   XI  34  Third
C   V   87  Third
D   VII 12  Third

Now I want some ability that I am able to find the list of all
students who have got higher marks continuously i.e. Third Test
Marks>Second Test>First Test.

Further I want a functionality that when I add marks of Fourth Test in
the sheet above then I shall need names of students whose marks are
increasing from last 3 tests i.e. Fourth Test>Third Test>Second Test.
In this case First test marks are irrelevant and so on for fifth,
sixth, seventh tests...

-- 
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts


Re: $$Excel-Macros$$ Dynamically assign values to an array using ComboBoxes

2010-10-20 Thread roberto mensa
attack the sample file
regards
r

-- 
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts


selezione_combo_in_serie.xls
Description: MS-Excel spreadsheet


Re: $$Excel-Macros$$ Dynamically assign values to an array using ComboBoxes

2010-10-20 Thread roberto mensa
2010/10/20 RemyMaza 

> That works fantastic.  It has some problems with how my form works
> though.  Let's say for all 7 combo-boxes, the user can only select
> values in order.  So if I need 4 devices added, I can't pick from the
> first two and then jump to combo box 5 and 6 to complete the form.  I
> need to force the entries to flow in order.  How would I do that or is
> that possible?
>
> Thanks for all of your help!
> Matt
>

 if I understand, it is more difficult ... try this soluction ... maybe
there is simpler solution ... you can adjust the order and number of
combobox, you must add a class module with the name cCombo:

 '
'in standard module
Public vOrder
'
'in userform class module
Option Explicit
Dim myCombo() As New cCombo

Sub iniz_u()
vOrder = Array("ComboBox5", "ComboBox2", "ComboBox3", "ComboBox4", _
"ComboBox1", "ComboBox6", "ComboBox7", "")
End Sub

Private Sub UserForm_Initialize()
Dim c As MSForms.Control
Dim v, l As Long, b As Boolean
'for example add same value to all combobox
v = Array(1, 2, 3, 4, 5, 6, 8, 9)
iniz_u
For Each c In Me.Controls
If TypeName(c) = "ComboBox" Then
c.List = v
ReDim Preserve myCombo(l)
Set myCombo(l).CC = c
'If b Then
c.Enabled = c.Name = vOrder(0)
'Else
'b = True
'End If
l = l + 1
End If
Next
End Sub

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Dim i
For i = 0 To UBound(myCombo)
Set myCombo(i) = Nothing
Next
End Sub
 '
'in the class module cCombo
Option Explicit
Public WithEvents CC As MSForms.ComboBox
Private Sub CC_Change()
If CC.ListIndex > -1 Then
enable_combo CC.Name
End If
End Sub

Sub enable_combo(scombo As String)
Dim i As Long, x As Long
Dim c As MSForms.Control
For i = 0 To UBound(vOrder)
If vOrder(i) = scombo Then
Exit For
End If
Next
For Each c In UserForm1.Controls
If TypeName(c) = "ComboBox" Then
If c.Name = vOrder(i + 1) Then
c.Enabled = True
Else
c.Enabled = False
End If
End If
Next
End Sub

I worked fast ... but in italy is night :-)
regards
r

-- 
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts


Re: $$Excel-Macros$$ Dynamically assign values to an array using ComboBoxes

2010-10-20 Thread RemyMaza
Sweet... That makes a lot of sense.  I already had the tab order and
the values blanked, so now I guess the ticket is to write a function
to handle the OnChange event.

Thanks for your help!
Cheers,
Matt

On Oct 20, 10:37 am, Paul Schreiner  wrote:
> First is to set the tab order for each object.
> That way, it makes it EASIER to do it in order.
>
> Next, I'd recommend setting the initial value of each box to either
> blank or a specific string.
> then, define a click event for each object that checks to see if the
> previous objects have been defined.
> If an object is not yet defined, set the focus to the first undefined object.
>
> Paul
>
>
>
> - Original Message 
> > From: RemyMaza 
> > To: MS EXCEL AND VBA MACROS 
> > Sent: Wed, October 20, 2010 9:39:03 AM
> > Subject: Re: $$Excel-Macros$$ Dynamically assign values to an array using
> >ComboBoxes
>
> > That works fantastic.  It has some problems with how my form works
> > though.  Let's say for all 7 combo-boxes, the user can only select
> > values in order.  So if I need 4 devices added, I can't pick from the
> > first two and then jump to combo box 5 and 6 to complete the form.  I
> > need to force the entries to flow in order.  How would I do that or is
> > that possible?
>
> > Thanks for all of your help!
> > Matt
>
> > On Oct 20, 6:51 am, roberto mensa  wrote:
> > > try in a form add some combobox and a button
> > > and add this code:
>
> > > Option Explicit
> > > Private Sub CommandButton1_Click()
> > > Dim v
> > > v = not_null_control_list()
> > > MsgBox Join(v, ";")
> > > End Sub
>
> > > Private Sub UserForm_Initialize()
> > > Dim c As MSForms.Control
> > > Dim v
> > > 'for example add same value to all combobox
> > > v = Array(1, 2, 3, 4, 5, 6, 8, 9)
> > > For Each c In Me.Controls
> > >     If TypeName(c) = "ComboBox" Then
> > >         c.List = v
> > >     End If
> > > Next
> > > End Sub
>
> > > Function not_null_control_list( _
> > >     Optional sNameC As String = "ComboBox")
> > > Dim c As MSForms.Control
> > > Dim v(), i As Long
> > > For Each c In Me.Controls
> > >     If TypeName(c) = sNameC Then
> > >         If c.ListIndex > -1 Then
> > >             ReDim Preserve v(i)
> > >             v(i) = c.Value
> > >             Debug.Print c.Value
> > >             i = i + 1
> > >         End If
> > >     End If
> > > Next
> > > not_null_control_list = v
> > > End Function
>
> > > regards
> > > r
>
> > >https://sites.google.com/site/e90e50/user/grafici-cruscotto-varianti
>
> > > 2010/10/19 RemyMaza 
>
> > > > I have a form with 7 combo boxes on it and I'd like to take the values
> > > > from the selections and store the value into an array.  Some
> > > > background:  The first two combo boxes must be selected otherwise the
> > > > form should not do anything.  As long as the first two equal a value,
> > > > the rest of them *could* be blank or contain a value.  What I'd like
> > > > to do is grab all of the values that aren't blank and resize my array
> > > > with these values.  I'm a bit green with arrays, so a layman's
> > > > approach would go a long way.  Here's the code I have already:
>
> > > >    Dim cCont As Control
> > > >    Dim arrDeviceVal() As String
> > > >    Dim i As Integer
>
> > > >    i = 0
>
> > > >    'I'm stuck on the logic for this array
> > > >    'Finds vals for Devices and ReDim's the array
> > > >    For Each cCont In Me.Controls
> > > >        If TypeName(cCont) = "ComboBox" Then
> > > >            arrDeviceVal = 
> > > >           'Also when I type: cCont. I do not get a property of Value
> > > > as I would expect.  How am I to get the value of the combo box then?
> > > >        End If
> > > >    Next cCont
>
> > > >    For i = 0 To UBound(arrDeviceVal)
> > > >        MsgBox arrDeviceVal(i)
> > > >    Next i
> > > >    If cmb1.Value = "" Or cmb2.Value = "" Then
> > > >        MsgBox "Device 1 and Device 2 cannot be blank.  Choose a
> > > > device for both of these to continue.", vbCritical
> > > >    Else
> > > >        'ActiveWorkbook.Sheets("ALL FILE").Range("C" & (intCellRow -
> > > > 8)).Value = arrDeviceVal(0)
> > > >        Unload Me
> > > >    End If
>
> > > > Thanks for any insight!!!
> > > > Cheers,
> > > > Matt
>
> > > > --
>
> > > > ---
> >---
> > > > Some important links for excel users:
> > > > 1. Follow us on TWITTER for tips tricks and links :
> > > >http://twitter.com/exceldailytip
> > > > 2. Join our LinkedIN group @http://www.linkedin.com/groups?gid=1871310
> > > > 3. Excel tutorials athttp://www.excel-macros.blogspot.com
> > > > 4. Learn VBA Macros athttp://www.quickvba.blogspot.com
> > > > 5. Excel Tips and Tricks athttp://exceldailytip.blogspot.com
>
> > > > To post to this group, send email to excel-macros@googlegroups.com
>
> > > > <><><><><><><><><><><><><><><><><><><><><><>
> > > > Like our page on facebook , Just follow below link
> > > >http://www.facebook.com/pages/discussexcelcom/160307843985936?v

Re: $$Excel-Macros$$ Help on Graph

2010-10-20 Thread P.VIJAYKUMAR
Dear Srinivas,

Just keep zeros whereever there are no values.


Regards,
Vijaykumar

On Wed, Oct 20, 2010 at 12:17 PM, Shrinivas Shevde
wrote:

> Dear All,
> Can Any one help me on graph ?
> Thanks in advance.
> --
> Shrini
>
> --
>
> --
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts
>



-- 









P.VIJAY KUMAR

-- 
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts


Re: $$Excel-Macros$$ Dynamically assign values to an array using ComboBoxes

2010-10-20 Thread Paul Schreiner
First is to set the tab order for each object.
That way, it makes it EASIER to do it in order.

Next, I'd recommend setting the initial value of each box to either
blank or a specific string.
then, define a click event for each object that checks to see if the
previous objects have been defined.
If an object is not yet defined, set the focus to the first undefined object.

Paul



- Original Message 
> From: RemyMaza 
> To: MS EXCEL AND VBA MACROS 
> Sent: Wed, October 20, 2010 9:39:03 AM
> Subject: Re: $$Excel-Macros$$ Dynamically assign values to an array using 
>ComboBoxes
> 
> That works fantastic.  It has some problems with how my form works
> though.  Let's say for all 7 combo-boxes, the user can only select
> values in order.  So if I need 4 devices added, I can't pick from the
> first two and then jump to combo box 5 and 6 to complete the form.  I
> need to force the entries to flow in order.  How would I do that or is
> that possible?
> 
> Thanks for all of your help!
> Matt
> 
> On Oct 20, 6:51 am, roberto mensa  wrote:
> > try in a form add some combobox and a button
> > and add this code:
> >
> > Option Explicit
> > Private Sub CommandButton1_Click()
> > Dim v
> > v = not_null_control_list()
> > MsgBox Join(v, ";")
> > End Sub
> >
> > Private Sub UserForm_Initialize()
> > Dim c As MSForms.Control
> > Dim v
> > 'for example add same value to all combobox
> > v = Array(1, 2, 3, 4, 5, 6, 8, 9)
> > For Each c In Me.Controls
> >     If TypeName(c) = "ComboBox" Then
> >         c.List = v
> >     End If
> > Next
> > End Sub
> >
> > Function not_null_control_list( _
> >     Optional sNameC As String = "ComboBox")
> > Dim c As MSForms.Control
> > Dim v(), i As Long
> > For Each c In Me.Controls
> >     If TypeName(c) = sNameC Then
> >         If c.ListIndex > -1 Then
> >             ReDim Preserve v(i)
> >             v(i) = c.Value
> >             Debug.Print c.Value
> >             i = i + 1
> >         End If
> >     End If
> > Next
> > not_null_control_list = v
> > End Function
> >
> > regards
> > r
> >
> > https://sites.google.com/site/e90e50/user/grafici-cruscotto-varianti
> >
> > 2010/10/19 RemyMaza 
> >
> >
> >
> > > I have a form with 7 combo boxes on it and I'd like to take the values
> > > from the selections and store the value into an array.  Some
> > > background:  The first two combo boxes must be selected otherwise the
> > > form should not do anything.  As long as the first two equal a value,
> > > the rest of them *could* be blank or contain a value.  What I'd like
> > > to do is grab all of the values that aren't blank and resize my array
> > > with these values.  I'm a bit green with arrays, so a layman's
> > > approach would go a long way.  Here's the code I have already:
> >
> > >    Dim cCont As Control
> > >    Dim arrDeviceVal() As String
> > >    Dim i As Integer
> >
> > >    i = 0
> >
> > >    'I'm stuck on the logic for this array
> > >    'Finds vals for Devices and ReDim's the array
> > >    For Each cCont In Me.Controls
> > >        If TypeName(cCont) = "ComboBox" Then
> > >            arrDeviceVal = 
> > >           'Also when I type: cCont. I do not get a property of Value
> > > as I would expect.  How am I to get the value of the combo box then?
> > >        End If
> > >    Next cCont
> >
> > >    For i = 0 To UBound(arrDeviceVal)
> > >        MsgBox arrDeviceVal(i)
> > >    Next i
> > >    If cmb1.Value = "" Or cmb2.Value = "" Then
> > >        MsgBox "Device 1 and Device 2 cannot be blank.  Choose a
> > > device for both of these to continue.", vbCritical
> > >    Else
> > >        'ActiveWorkbook.Sheets("ALL FILE").Range("C" & (intCellRow -
> > > 8)).Value = arrDeviceVal(0)
> > >        Unload Me
> > >    End If
> >
> > > Thanks for any insight!!!
> > > Cheers,
> > > Matt
> >
> > > --
> >
> > > ---
> > >  
>---
> > > Some important links for excel users:
> > > 1. Follow us on TWITTER for tips tricks and links :
> > >http://twitter.com/exceldailytip
> > > 2. Join our LinkedIN group @http://www.linkedin.com/groups?gid=1871310
> > > 3. Excel tutorials athttp://www.excel-macros.blogspot.com
> > > 4. Learn VBA Macros athttp://www.quickvba.blogspot.com
> > > 5. Excel Tips and Tricks athttp://exceldailytip.blogspot.com
> >
> > > To post to this group, send email to excel-macros@googlegroups.com
> >
> > > <><><><><><><><><><><><><><><><><><><><><><>
> > > Like our page on facebook , Just follow below link
> > >http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&;...
> 
> -- 
>--
>-
> Some e important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links : 
>http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogs

$$Excel-Macros$$ An Alternative to 'Microsoft Visual Basic For Applications Extensibility'

2010-10-20 Thread ChrisDixon
I have a problem that could easily be solved using Microsoft Visual
Basic For Applications Extensibility, but cannot enable the 'Trust
Access to the VB Project Object Model' setting, so must find another
solution

>From within Workbook A, I want to retrieve a list of forms, modules,
functions and subs from Workbook B.  Either of the following methods
would be fine:

Workbook A to pull the details from Workbook B

Workbook B to push the details to a text file and Workbook A to pick
up the text files

Does anybody know of a way to get these details out of Workbook B
without resorting to VBE?

-- 
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts


Re: $$Excel-Macros$$ Dynamically assign values to an array using ComboBoxes

2010-10-20 Thread RemyMaza
That works fantastic.  It has some problems with how my form works
though.  Let's say for all 7 combo-boxes, the user can only select
values in order.  So if I need 4 devices added, I can't pick from the
first two and then jump to combo box 5 and 6 to complete the form.  I
need to force the entries to flow in order.  How would I do that or is
that possible?

Thanks for all of your help!
Matt

On Oct 20, 6:51 am, roberto mensa  wrote:
> try in a form add some combobox and a button
> and add this code:
>
> Option Explicit
> Private Sub CommandButton1_Click()
> Dim v
> v = not_null_control_list()
> MsgBox Join(v, ";")
> End Sub
>
> Private Sub UserForm_Initialize()
> Dim c As MSForms.Control
> Dim v
> 'for example add same value to all combobox
> v = Array(1, 2, 3, 4, 5, 6, 8, 9)
> For Each c In Me.Controls
>     If TypeName(c) = "ComboBox" Then
>         c.List = v
>     End If
> Next
> End Sub
>
> Function not_null_control_list( _
>     Optional sNameC As String = "ComboBox")
> Dim c As MSForms.Control
> Dim v(), i As Long
> For Each c In Me.Controls
>     If TypeName(c) = sNameC Then
>         If c.ListIndex > -1 Then
>             ReDim Preserve v(i)
>             v(i) = c.Value
>             Debug.Print c.Value
>             i = i + 1
>         End If
>     End If
> Next
> not_null_control_list = v
> End Function
>
> regards
> r
>
> https://sites.google.com/site/e90e50/user/grafici-cruscotto-varianti
>
> 2010/10/19 RemyMaza 
>
>
>
> > I have a form with 7 combo boxes on it and I'd like to take the values
> > from the selections and store the value into an array.  Some
> > background:  The first two combo boxes must be selected otherwise the
> > form should not do anything.  As long as the first two equal a value,
> > the rest of them *could* be blank or contain a value.  What I'd like
> > to do is grab all of the values that aren't blank and resize my array
> > with these values.  I'm a bit green with arrays, so a layman's
> > approach would go a long way.  Here's the code I have already:
>
> >    Dim cCont As Control
> >    Dim arrDeviceVal() As String
> >    Dim i As Integer
>
> >    i = 0
>
> >    'I'm stuck on the logic for this array
> >    'Finds vals for Devices and ReDim's the array
> >    For Each cCont In Me.Controls
> >        If TypeName(cCont) = "ComboBox" Then
> >            arrDeviceVal = 
> >           'Also when I type: cCont. I do not get a property of Value
> > as I would expect.  How am I to get the value of the combo box then?
> >        End If
> >    Next cCont
>
> >    For i = 0 To UBound(arrDeviceVal)
> >        MsgBox arrDeviceVal(i)
> >    Next i
> >    If cmb1.Value = "" Or cmb2.Value = "" Then
> >        MsgBox "Device 1 and Device 2 cannot be blank.  Choose a
> > device for both of these to continue.", vbCritical
> >    Else
> >        'ActiveWorkbook.Sheets("ALL FILE").Range("C" & (intCellRow -
> > 8)).Value = arrDeviceVal(0)
> >        Unload Me
> >    End If
>
> > Thanks for any insight!!!
> > Cheers,
> > Matt
>
> > --
>
> > --- 
> > ---
> > Some important links for excel users:
> > 1. Follow us on TWITTER for tips tricks and links :
> >http://twitter.com/exceldailytip
> > 2. Join our LinkedIN group @http://www.linkedin.com/groups?gid=1871310
> > 3. Excel tutorials athttp://www.excel-macros.blogspot.com
> > 4. Learn VBA Macros athttp://www.quickvba.blogspot.com
> > 5. Excel Tips and Tricks athttp://exceldailytip.blogspot.com
>
> > To post to this group, send email to excel-macros@googlegroups.com
>
> > <><><><><><><><><><><><><><><><><><><><><><>
> > Like our page on facebook , Just follow below link
> >http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&;...

-- 
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts


Re: $$Excel-Macros$$ Help on Graph

2010-10-20 Thread Ajay Varshney
Solution is in the attachment.


I have used Pivot table and used NA for values of blank.





Ajay Varshney


On Wed, Oct 20, 2010 at 12:17 PM, Shrinivas Shevde
wrote:

> Dear All,
> Can Any one help me on graph ?
> Thanks in advance.
> --
> Shrini
>
> --
>
> --
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts
>

-- 
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts


Graph(1).xlsx
Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet


Re: $$Excel-Macros$$ Help on Graph

2010-10-20 Thread Siva Kumar Vemula
Hai Srini,

Please find attached modified.

regards,
siva

On 10/20/10, Shrinivas Shevde  wrote:
> Dear All,
> Can Any one help me on graph ?
> Thanks in advance.
> --
> Shrini
>
> --
> --
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts
>

-- 
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts


Graph.xlsx
Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet


Re: $$Excel-Macros$$ Help with DoEvents to show progress form, please?

2010-10-20 Thread roberto mensa
try this soluction:

'in the  class moduleuserform2
'showmodale=false

Private Sub CommandButton1_Click()
Dim d
d = Now
UserForm1.Show vbModeless
'your code
'for example
Do
Loop Until Now > (d + TimeValue("00:00:10"))

Unload UserForm1
End Sub



'in the  class moduleuserform1
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu Then
Cancel = True
End If
End Sub

regards
r

https://sites.google.com/site/e90e50/user/excel-grafico-semaforo
2010/10/20 Ed from AZ 

> I've got a pretty long-running macro inside a UserForm, and I wanted
> to open a second form just to show that things are still working and
> not crashed.  It's pretty simple - four labels and I cycle around
> turning one at a time a different color.
>
> I call it from the main form with
> Private Sub CommandButton1_Click()
>
> DoEvents
> frmWaiting.Show vbModeless
> DoEvents
>
> Unfortunately, once the code drops into the second form, the main
> code
> in the first form never executes.
>
> I thought DoEvents was supposed to let the running code "drop
> through"
> to allow both forms to run their code.  Obviously, I'm very
> incorrect!!  8>(
>
> How can I make this happen correctly?
> Ed
> (XL2007, Vista Pro)
>
> --
>
> --
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts
>

-- 
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts


Re: $$Excel-Macros$$ Dynamically assign values to an array using ComboBoxes

2010-10-20 Thread roberto mensa
try in a form add some combobox and a button
and add this code:

Option Explicit
Private Sub CommandButton1_Click()
Dim v
v = not_null_control_list()
MsgBox Join(v, ";")
End Sub

Private Sub UserForm_Initialize()
Dim c As MSForms.Control
Dim v
'for example add same value to all combobox
v = Array(1, 2, 3, 4, 5, 6, 8, 9)
For Each c In Me.Controls
If TypeName(c) = "ComboBox" Then
c.List = v
End If
Next
End Sub

Function not_null_control_list( _
Optional sNameC As String = "ComboBox")
Dim c As MSForms.Control
Dim v(), i As Long
For Each c In Me.Controls
If TypeName(c) = sNameC Then
If c.ListIndex > -1 Then
ReDim Preserve v(i)
v(i) = c.Value
Debug.Print c.Value
i = i + 1
End If
End If
Next
not_null_control_list = v
End Function

regards
r

https://sites.google.com/site/e90e50/user/grafici-cruscotto-varianti


2010/10/19 RemyMaza 

> I have a form with 7 combo boxes on it and I'd like to take the values
> from the selections and store the value into an array.  Some
> background:  The first two combo boxes must be selected otherwise the
> form should not do anything.  As long as the first two equal a value,
> the rest of them *could* be blank or contain a value.  What I'd like
> to do is grab all of the values that aren't blank and resize my array
> with these values.  I'm a bit green with arrays, so a layman's
> approach would go a long way.  Here's the code I have already:
>
>Dim cCont As Control
>Dim arrDeviceVal() As String
>Dim i As Integer
>
>i = 0
>
>'I'm stuck on the logic for this array
>'Finds vals for Devices and ReDim's the array
>For Each cCont In Me.Controls
>If TypeName(cCont) = "ComboBox" Then
>arrDeviceVal = 
>   'Also when I type: cCont. I do not get a property of Value
> as I would expect.  How am I to get the value of the combo box then?
>End If
>Next cCont
>
>For i = 0 To UBound(arrDeviceVal)
>MsgBox arrDeviceVal(i)
>Next i
>If cmb1.Value = "" Or cmb2.Value = "" Then
>MsgBox "Device 1 and Device 2 cannot be blank.  Choose a
> device for both of these to continue.", vbCritical
>Else
>'ActiveWorkbook.Sheets("ALL FILE").Range("C" & (intCellRow -
> 8)).Value = arrDeviceVal(0)
>Unload Me
>End If
>
>
>
> Thanks for any insight!!!
> Cheers,
> Matt
>
> --
>
> --
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts
>

-- 
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts


$$Excel-Macros$$ Help on Graph

2010-10-20 Thread Shrinivas Shevde
Dear All,
Can Any one help me on graph ?
Thanks in advance.
-- 
Shrini

-- 
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts


Graph.xlsx
Description: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet