[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Visual Basic code for a Stock ticker [part 2]



PureBytes Links

Trading Reference Links

<x-html><!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML><HEAD>
<META content=text/html;charset=iso-8859-1 http-equiv=Content-Type>
<STYLE></STYLE>

<META content='"MSHTML 5.00.0910.1309"' name=GENERATOR></HEAD>
<BODY bgColor=#ffffff>This is a re-send of earlier send mail, and as it did not 
arrive at the List-server,<BR>have had to split the mail in 2 seperate 
mails(part 1 and part 2).<BR><BR>&gt;One problem in Excel -- there is no place 
to store &quot;in cell&quot; code bits and<BR>&gt;pieces for future 
reference.<BR>&gt;<BR>&gt;Maybe someone can think of a simple library type 
access system. I just store<BR>&gt;them on emails that I send to myself. Pretty 
primitive?<BR>---------------------------------------------------------------<BR><BR>You 
can have in a cell:<BR>&nbsp;-the cell's formula itselve as printed 
text<BR>&nbsp;or<BR>-the cell's formula outcomes as results<BR>&nbsp;<BR>both 
are ASCI-text, but treated differently(eg one is invisable / hidden) and 
choice<BR>is users. It requires for you to make the cell's formula to be the 
cell's definite text.<BR>Tho you can Copy and Paste formulas to other programs, 
a more natural way in Excel is<BR>to Copy and Paste the formulas over to another 
Column, eg as virtual text.<BR><BR>Here are a few 
ways:<BR><BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
***Make a spare back-up copy of your WorkBook first***<BR><BR>In the Formula 
Editor precede the &quot; = &quot; character (In the Cell Editor this is 
the<BR>reference character for the Formula Mode) by the &quot; ' &quot; 
character(In the Cell Editor<BR>this is a reference charcter for Display 
Text).<BR>(The &quot; ' &quot; character will not be visable, only the formula 
will be given, preceded<BR>by the &quot; = &quot; character).<BR><BR>A= the 
Official MSExcel way<BR>B= the workaround <BR><BR>A. In the Excel program 
Configuration:<BR>&nbsp;&nbsp;&nbsp;&nbsp; Choose 
Tools|Options|Display|Window(options)|Formulas and on this 
Display-TAB<BR>&nbsp;&nbsp;&nbsp;&nbsp; apply(=activate) the Formulas box in the 
Window options section. Click OK.<BR>&nbsp;&nbsp;&nbsp;&nbsp; Back in your Sheet 
copy all the formulas over to an empty remained 
Column<BR>&nbsp;&nbsp;&nbsp;&nbsp; (eg Select the Column and in the WorkMenu 
Click Edit|Copy and in the Sheet<BR>&nbsp;&nbsp;&nbsp;&nbsp; Click an empty 
Columns Header(say M) and in the WorkMenu Click Insert|Copied 
Cells<BR>&nbsp;&nbsp;&nbsp;&nbsp; and the column L (left of Column M) will be 
inserted containing the formulas. <BR>&nbsp;&nbsp;&nbsp;&nbsp; Then preceed here 
with B.1 for the perminent text-display (at point 
B.1<BR>&nbsp;&nbsp;&nbsp;&nbsp; replace reading column A with the by you 
applicable column).<BR>&nbsp;&nbsp;&nbsp;&nbsp; When you are finished with B.1 
and the following B.#'s, then do not forget<BR>&nbsp;&nbsp;&nbsp;&nbsp; to 
&quot;undo&quot; the above Excel program's configuration Option 
again.<BR><BR>or<BR><BR>B. And this is asuming that you have all formulas in one 
single column, and that you<BR>&nbsp;&nbsp;&nbsp;&nbsp; will also have to do 
this for each column(that contain any formulas) 
seperatly.<BR><BR>&nbsp;&nbsp;&nbsp;&nbsp; 1-Select Column A by Clicking the 
column's spreadsheet Header(not your header), 
here<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; this is (capitol) 
&quot; A &quot;. This will blacken the entire column 
A.<BR>&nbsp;&nbsp;&nbsp;&nbsp; 2-On the WorkMenu Click 
Edit|Replace<BR>&nbsp;&nbsp;&nbsp;&nbsp; 3-In the Dialog Window 1st field type 
the &quot; = &quot; character (without quotation 
marks)<BR>&nbsp;&nbsp;&nbsp;&nbsp; 4-In the Dialog Window 2nd field type the 
&quot; ` &quot; and &quot; = &quot; characters (joined 
and<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; without the quotation 
marks), eg it will look like 
this:<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
`=<BR>&nbsp;&nbsp;&nbsp;&nbsp; 5-Click Replace All<BR>&nbsp;&nbsp;&nbsp;&nbsp; 
6-Click Close<BR>&nbsp;&nbsp;&nbsp;&nbsp; 7-Back in the Sheet, Click the Column 
A spreadsheet Header again to have the 
entire<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; column 
selected(blackened)<BR>&nbsp;&nbsp;&nbsp;&nbsp; 8-On the WorkMenu click 
Edit|Copy and in the Sheet click the Column M 
spreadsheet<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Header(column M 
is taken as an example).<BR>&nbsp;&nbsp;&nbsp;&nbsp; 9-On the WorkMenu Click 
Insert|Copied Cells and the formulas from Column A will 
be<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Copied over to Column 
L<BR>&nbsp;&nbsp; 10-Return to Column A again by Clicking its spreadsheet 
Header<BR>&nbsp;&nbsp; 11-On the WorkMenu Click Edit|Replace <BR>&nbsp;&nbsp; 
12-In the Dialog Window 1st field type the &quot; ` &quot; and &quot; = &quot; 
characters (joined and<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
without the quotation marks), eg it will look like 
this:<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; `=<BR>&nbsp;&nbsp; 
13-In the Dialog Window 2nd field type the &quot; = &quot; 
character<BR>&nbsp;&nbsp; 14-Click Replace All<BR>&nbsp;&nbsp; 15-Click 
Close<BR><BR>This will have all the formulas being put back into their original 
state again and<BR>the cells being put back to their normal display AND now you 
have also created a<BR>seperate constant readable formula column. However, this 
is not linked, so any changes<BR>made to the Column A formulas will not be 
reflected in the Column L 
copies.&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <BR><BR>Or see the 
attached Microsoft Tips part-2 (toptips.html).<BR><BR>Regards,<BR>Ton Maas<BR><A 
href="mailto:ms-irb@xxxxxx";>ms-irb@xxxxxx</A><BR><BR><BR><BR>&nbsp;<BR>----- 
Original Message ----- <BR>From: Walter Lake &lt;<A 
href="mailto:wlake@xxxxxxxxx";>wlake@xxxxxxxxx</A>&gt;<BR>To: Metastock bulletin 
board &lt;<A 
href="mailto:metastock@xxxxxxxxxxxxx";>metastock@xxxxxxxxxxxxx</A>&gt;<BR>Sent: 
vrijdag 12 maart 1999 21:13<BR>Subject: Visual Basic code for a Stock 
ticker<BR><BR>&gt;snip----------------------------------------<BR></BODY></HTML>
</x-html>
Attachment Converted: "c:\eudora\attach\toptips.htm"