uot; tab of the spreadsheet??
Hoping in anticipation. Regards, Stuart Baldock
On Saturday, June 9, 2012 3:21:59 AM UTC+8, Ayush Jain wrote:
> Hey all new and current posters,
>
> Welcome to excel group,one of the largest online community of excel Fans!
>
> I hope you enjoy your time
I created a UserForm. The form has several "frames" (for VB folks, VBA
"frames" are called "groups" in VB for some reason). I created a sub
routine:
Private Sub fraMyFrame_Click()
DoStuff
End Sub
If I click *inside* the frame then the click event is triggered and DoStuff
runs.
In a se
Paul
Thanks for your message.
So the exact steps I would like are as follows:
1. Data is all in sheet1 in rows.
2. Macro search down column J and look for the word "Apple" or "Pear" and
when it finds those words select the cell containing the word plus the
previous 4 cells and copy them all.
3
On Oct 12, 2011 Stuart Redmann wrote:
> > Hello newsgroup,
>
> > I tried the following code to create an ActiveX checkbox under Excel:
>
> > - Create new workbook.
> > - Add following code to worksheet 1
>
> > Sub test()
> > Me.Shapes.AddOLEObject &quo
Can anybody re-produce this behaviour?
Is this a bug?
If it is a bug, does it go away under Excel 2003+x, x>0?
Thanks in advance,
Stuart
--
--
Some important links for excel users:
1. Follow us on TWITTER for tips
on
Sub test()
Dim v As Variant
v = getArray
Dim h() As Double
h = v
End Sub
Regards,
Stuart
--
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twi
> b8 2
> > > c9 3
> > > d1 5
> > > e8.51
> > >
> > > I want to put the values (a, b, c, d, e) from the Person
> > > column next to the data point. For exampl
wSeries.MarkerStyle = xlMarkerStyleCircle
NewSeries.MarkerBackgroundColor = 1
NewSeries.MarkerForegroundColor = 1
NewSeries.MarkerSize = 5
NewSeries.ApplyDataLabels AutoText:=True, _
LegendKey:=False, _
ShowSeriesName:=Tr
ess Escape (you may have to hold it for 2 or 3
seconds). This will pause the execution of the macro so that you can
see what it is doing in the debugger.
Regards,
Stuart
--
--
Some important links for excel users:
1.
e same key as the cells a | abb, so that your
algorithm will detect a false duplicate. Note that if you compare the
contents of the cells as strings, you'll be much slower when the cell
actually contains a number that has already been parsed by Excel. If
you compare the numbers, you&#x
w.
SourceRow = SourceRow + 1
Next
Worksheets("Desire format").Range(Cells(4, 1), _
Cells(4 + UBound(TargetArray),
11)).Value = TargetArray
End Sub
Regards,
Stuart
--
and so forth.
I hope this makes sense to someone
Best regards
Stuart
--
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our
' instead of the next row.
Set TargetCell = TargetCell.Offset(0, 1)
TargetCell.Value = SourceCell.Offset(0, 3)
End If
' Remember the MISDN that we have seen in this iteration and
' advance the source cell to the next row.
LastMISDN = SourceCell.Val
has been added to List of Users")
>
> > 'return to menu page
> > Sheets("Menu").Select
> > End Sub
>
> > The problems are as follows:-
>
> > 1. I have just added the code to check to see if the cancel button is
> >
* Workbooks; /* Global Workbooks collection */
Worksheet* Worksheets; /* Global Worksheets collection */
/* Here comes your code.
*/
void CopyShNamesFromWKbToWkb2 ()
{
int i;
Workbook* wkb; /* = Nouveau_Feuille_Excel_1.xls */
Workbook* wkb2;
Worksheet* ws;
ws = Worksheets;
for
rror descriptions on the net but
nobody has a useful answer.
Regards,
Stuart
--
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Jo
el doesn't support dual
interfaces.
Regards,
Stuart
--
--
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:
terior.Color = LastColor
' Remember the current key for the next iteration of this loop.
LastKey = CurrentSelection.Cells(r, 1).Value2
End If
Selection.Cells(r, 0).Value2 = LastBlockNumber
Next r
End Sub
Regards,
Stuart
--
--
for both SetupOneTime and SortTable
into a Code Module, run the SetupOneTime macro through Alt+F8, and
everything worked as expected.
Regards,
Stuart
--
--
Some important links for excel users:
1. Follow us on TWITTER
t; > > name like 7EA78f10 ……and shows a save as dialogue box, when I click on
> > > cancel the above error message is displayed and when I save that file, it
> > > says “Excel has encountered a problem and need to close and it will start
> > > recovering the files agai
Hi Nadine,
I've sent you an email with a file that hopefully does what you want.
Please don't answer by email, since I have a quite selective spam-
filter. Please post to this newsgroup instead. Thanks.
Stuart Redmann wrote:
> > I guess that what you wanted to say is that you wan
around this if you (a) use
Excel 2010, or (b) use a simple database, for example Access. The
later has the benefit that more than one user can enter data.
Regards,
Stuart
--
--
Some important links for excel us
. every type of change i want to trace.,
Why don't you just turn on the macro recorder? This component pretty
much saves a playback of all the actions the user does. The recorded
macro can be used to generate a log file.
I can't think of any ot
out of luck. A quick scan with Google yielded very little
usable information: It seems that automatable formula editing controls
are quite rare. Most probably it will be the easiest if you use Latex
to typeset your formula
-7 $22400.10
If this text is in cell A1, you can enter the following formula into
some other cell and retrieve the dollar value from A1. Then you can
format the new cell as currency manually (you can do this for lots of
cells in one go).
=RIGHT(A1,LEN(A1) - FIND(&quo
uot; values. This may be a bug, although some people rather
consider Excel's displaying "0.15" a bug.
Regards,
Stuart
--
--
Some important links for excel users:
1. Follow us on TWITTER for
cimal fractions that are no binary fractions cannot be stored as
exact values. So what you see is most probably not some kind of
"inverse rounding" but just the exact value of the floating point
variable.
Regards,
Stuart
--
--
les in a separate Excel server? If so, have you
enabled macro processing in these servers?
Regards,
Stuart
--
--
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twit
time. We are
happy to help you with your problem, but we don't like to spend much
time to find our what your problem actually is.
Regards,
Stuart
--
--
Some important links for excel users:
1. Follow us on TWITTE
On 30 Jun. Kurt wrote:
> > > 1. The comment in this code has as an example, "ShadeAlternateRows
> > > Range("A1:D50"), 27, 2", but where in the actual code do you put this
> > > information?
Stuart Redmann wrote:
> > That depends on when th
Sub and
> End Sub line.)
You have to add the line
"ShadeAlternateRows Range("A1:D50"), 27, 2"
in the Workbook_open method, not the code of ShadeAlternateRows.
ShadeAlternateRows is best be placed i
uot;Implements" keyword
(you can even implement multiple interfaces in one module). Note that
the implementation of an interface in an all-or-nothing thing: You'll
have to implement all procedures of the interface.
Regards,
Stuart
--
-
On 10 Jun., 14:14, Rod Urand wrote:
> Stuart,
>
> Thank you for going to all the trouble to build this. I do have a
> problem. I just found out that they are indeed free floating
> checkboxes that are not attached to cells.
>
> Are we just out of luck here?
Not at all,
Number - 1 - 26) / 26) Mod 26) + 65) & _
Chr(((ColumnNumber - 1) Mod 26) + 65)
ElseIf ColumnNumber > 26 Then
' double letter columns
ColumnLetter = Chr(Int((ColumnNumber - 1) / 26) + 64) & _
Chr(((ColumnNumber - 1) Mod
t
figure out how to do so (I'm using Google Groups :-(
The following is the code in plain text. You'll have to copy it into a
new worksheet. Then you can enter dos commands into the cells A4, B4
and C4, such as
cmd /c "copy C:\Temp\foo.txt C:\Temp\bar.tx
with regard to
your problem. I just guess that you'll have to find out what is going
wrong by yourself (which is usually the hardest part of programming).
Good luck,
Stuart
--
--
Some important links for excel us
sh Jain
> Group Manager
Dear Mr. Jain,
if I don't regularly visit any group that is mentioned in question 8,
I still have to select one of them in order to be able to finish the
survey. That seems like a bug to me.
Regards,
Stuart
--
--
ing the other OutProc Excel
instance is negligible in my case).
To say something about your problem is quite hard since you have
provided very little background information. Are the other instances
of Excel in any way related to your insta
ring, _
Criterion2 as String)
> Selection.Copy
> Sheets("sheet1a").Select
> ' This line will be diff for each sheet operated on; e.g., for
> sheet1a, sheet1b, sheet2a, sheet2b, sheet3a, sheet3b, sheet4a, sheet4b
>
> Range("A1").Select
&
rash Excel as well.
To put it like some sportswear manufacturer: Just try it!
Regards,
Stuart
PS: If you post to newsgroups, you can safely turn off your privacy
disclaimer (after all, your posting is _supposed_ to be re
the property
MyArray directly?
Thanks in advance,
Stuart
PS: I'm using VB6.0 inside Excel 2003 (don't know about any service
packs).
--
--
Some important links for excel users:
1. Follow us on TWITTER for
as Excel.Worksheet)
'Column C Validation
With p_Worksheet.Range("C9").Validation
.Delete
:
end sub
Then you can invoke it by:
SetValidation Worksheets ("Sat EEA")
SetValidation Worksheets ("Sun EEA")
:
If you really must use an array of worksh
e to embed some sort of style indicator
in the cell text and use a macro to reassign the style, but this is
really a last resort.
Thanks,
Stuart.
--~--~-~--~~~---~--~~
--
Some important
43 matches
Mail list logo
