Category : Windows 3.X Files
Archive   : XL2CRD.ZIP
Filename : EXC2CRD.XLM

 
Output of file : EXC2CRD.XLM contained in archive : XL2CRD.ZIP

@ ŠTý W0 d
ü©ñÒMbP?"*+%Ҁ1  Helv21  Helv2¼1  Helv21  Helv2¼&fPage &p&ø?'ð?(ð?)ð[email protected]$Õ$U$$*$ $ UGeneral00.00#,##0 #,##0.00$#,##0 ;($#,##0)$#,##0 ;[Red]($#,##0)$#,##0.00 ;($#,##0.00)$#,##0.00 ;[Red]($#,##0.00)0%0.00% 0.00E+00m/d/yy d-mmm-yyd-mmmmmm-yy
h:mm AM/PM
h:mm:ss AM/PMh:mmh:mm:ss m/d/yy h:mm"aABOUT,F"s AUTO_OPEN,"CONVERT,"CriteriaCur_Card  Cur_FieldDatabase Data_Form"EXIT,B" EXIT_EXC2CRD,:" GET_INPUT,"GET_INPUT_EXIT,"
GET_OUTPUT,"GET_OUTPUT_EXIT,   Got_Input, 
Got_Output,"HELP,J 
Input_File, 
Max_Fields,  Menu_Bar_No,  Num_Cards,% 
Num_Fields,&  Output_File,
Print_Area Print_TitlesRecorder"zShow,NT


Ҁ

Ҁ=

Ҁ

Ҁe

Ҁr

Ҁ4

Ҁª

Ҁ 

Ҁ

Ҁ¶


Ҁ.

Ҁó

Ҁl


Ҁ,

ҀÁ

Ҁ,

Ҁ¸

Ҁ„

Ҁ

Ҁi

Ҁ

ҀÁ

Ҁ 

Ҁ¶

Ҁ¢

Ҁ

ҀÈ

Ҁ¼

Ҁß

ҀJ

Ҁ

ҀãlÀhMAINLINE[email protected] AUTO_OPEN[email protected]-S@l0ÿÿBWl0turn off screen updatesl€
Constants,l
Max_Fields _
}lÿÿX©ll€ Flagsl Got_Input _}lÿÿ Xª"lmove and size Excel windowl
Got_Output _mmÿÿ È(X«m@mÿÿ
#
Alminitialize constants m€MENU
[email protected](&File@ @ @ @0  [email protected]FILE@mÿÿ #Almm &Input...mEXC2CRD.XLM!GET_INPUT$mSpecify the input file name.m
EXC2CRD.HLP!1Z mR Input - Used to specify the input file. It must be Excel @nÿÿ #Al n n
&Output...nEXC2CRD.XLM!GET_OUTPUT%nSpecify the output file name.n
EXC2CRD.HLP!2X nP compatible, and not require parsing. The fulln Menu_Bar_Non@A—o
Setup Menu o-@V oN name, including extension must be specified. @" oð?C%À ÀA˜ o File Menu o
&Exit EXC2CRD oEXC2CRD.XLM!EXIT_EXC2CRD( o Exit EXC2CRD, but stay in Excel. o
EXC2CRD.HLP!3_ oW If the file is not in the current directory, then the
@"
p@Ct/~%
ÀÀA˜
p Convert Menu

pE&xit
pEXC2CRD.XLM!EXIT
p Exit Excel.
p
EXC2CRD.HLP!4F
p> full path must be specified. @" p@CT0~%ÀÀA˜ q Help Menu q- @ o @) qÿÿCø0~ConvertAš qTurn off convert option qH&About EXC2CRD... q@EXC2CRD.XLM!ABOUT @ q@About EXC2CRD. qP
EXC2CRD.HLP!5U qM Output - Used to specify the name of the output cardfile.
@
qÿÿ C,1~B
rshow the new menu
[email protected]&Convert
@V
rN This will be in CARDFILE format, so the .CRD@rð? %À!À
A¡rshow About boxr&Excel -> CardfilerEXC2CRD.XLM!CONVERT@%r@Start the conversion process.rP
EXC2CRD.HLP!6[ rS extension should be used. The file will be saved@HsPÿÿB7mP
[email protected](&Help^ @_ sW in the current directory unless a path is specified.sH
EXC2CRD &Helps@EXC2CRD.XLM!HELP@s@Further information.sP
EXC2CRD.HLP!7 p@ø[email protected] GET_INPUT@sR tJ Exit EXC2CRD - Closes files and exits EXC2CRD, but stays in Excel.t
Input_FileOt¨4~ÿÿ>#Enter the name of the new cardfile:
Input FiledPBh
vendlsts.xls#topen input file - read onlyt€Help Box@( @ 2 @ 2 @ ô @ ’ @ 
@0[ tS (To view the macro, choose this option then presso/uÿÿC 
# A5Budrop out if cancelled @ @
 @
 B,, u$EXCEL to CARDFILE Conversion Utility
@4 u, -z.)@uÿÿBTuturn off error checking @ @ @2 @ô @j uR[-15]C[3]:R[28]C[3] 
A* q@WvÿÿFCD5~XA~$File invalid or not foundXv#x-~;AlBvsee if we can open it @ @© @
 @@
 vOK
@4 v, Exit - Exits Excel.@vÿÿBT$vturn on error checking again @H @@¾ @@# @@‚@@ v@COMMANDS
@P @@(vÿÿCT6~ XB!wif we got it, maximize itB w: About... - About EXC2CRD Information Box@:wÿÿ)Cü1~Convert#ü6~#4.~#B$Aš)w!try to enable the convert command @wHGET_INPUT_EXITwPÿÿB7@Pw€ About Boxp( @ x @ E @  @ – @ 
@0
 w  [email protected]CONVERTm€@@ q @x @z @@
 wOK
@U xM Excel -> Cardfile - Begins the conversion process. This item is greyed{€û[email protected]
GET_OUTPUT@p @ @b @ xExcel to Cardfile
@` xX until both Input and Output files are specified. Thex Output_FilePx"9~ÿÿ?#Enter the name of the new cardfile: Output FiledPBh cardout.crdyget input file name @ @y @ @H yEXC2CRD
@Z yR number of fields transferred is limited to ten.@=yÿÿ,C C²9~ B%
##A5Bydrop out if cancelled r @Z @ yConversion Utility
@V zN EXC2CRD will convert approximately 50 cardsqzÿÿ #–7~Alzset flag s @} @4 z
ver 1.02
@Y zQ per minute on a 20MHz 386. The maximum numberm:zÿÿ)Cz7~Convert#Ž7~#h:~#B$Aš){!try to enable the convert command @ @l @? {
Dec 15 1990
@X {P of records which can be converted to cards is

Ҁ
!
ҀÎ
"
Ҁ
#
Ҁc
$
Ҁ›
%
Ҁ¤
&
Ҁ¥
'
Ҁ°
(
Ҁª
)
Ҁ¡
*
Ҁ±
+
Ҁi
,
Ҁx
-
Ҁb
.
Ҁ‰
/
Ҁ¼
0
Ҁ«
1
ҀC
2
Ҁ7
3
ҀS
4
ҀH
5
ҀG
6
ҀC
7
Ҁ7
8
Ҁ[
9
Ҁ.
:
Ҁ
;
Ҁ.
<
ҀH
=
ҀK
>
ҀL
?
ҀH {HGET_OUTPUT_EXIT {PÿÿB7 @P @ @X @U {Frank Reidelberger
@< {4 memory dependent.!m€!@@ !@H !@@@ !@@b !@@¸!@@! |@CompuServe: 73230,650!
@P! z"r€û"|@hCONVERT"rp6" |. DO NOT DISTURB THIS PROCESS ONCE STARTED.#@%#|.²@ CARDFILE.EXEBn#|start CardfileI# |A Switching focus to any window other than Cardfile will cause$m$|ÿÿXA#$|move to bottom right cornerV$ |N unpredictable results. This is a result of limitations in Cardfile which%} Num_Cards%}[email protected]!^B%}set number of cardsS% }K doesn't support DDE. In order to transfer the information, keystrokes&}
Num_Fields!&}@!^B #2-~ B&&}no more than Max_Fields fieldsG& ~? are sent to Cardfile which MUST be the active application.'lk'~Z!^B Cë=~
B1Too many fields for Cardfile. Fields limited to Ck>~KXvB!'~if constrained, tell user' v(l(~ÿÿ R1C1Xm(~go back to top of fileR( J If you must interrupt the process during execution, alternately click)@,)ÿÿCur_CardCB«$)for n = 1 to number of cardsJ) @B on the Excel window and press Escape. You may have to repeat*r€ *ÿÿ {F7}Xƒ*@Add Card command * @ this several times.+r€ -+@ÿÿ Cur_FieldCB«-+@%for n = 1 to number of fields in body+ v,@.,@ÿÿRC
CCXm,@ select it , @@HELP-@-@ÿÿX2-@copy itO- @G EXC2CRD Help - This help system. Note that context sensitive help.@.@ÿÿ +{INSERT}Xƒ.@paste it to Cardfile .
A ]. AU is also available by highlighting a menu option and/@6/@%CV| {ENTER}XƒB(/A send extra if header record6/ A. pressing F1.0@0@ÿÿA®0A
next field0 BX1m 1@ÿÿA®1A next card2@€ 2@ÿÿ%FAXƒ'2ASave Cardfile output file as...3@€ "3AÿÿC½9~~Xƒ3A Output_File4@€ 4AÿÿX4BClose Excel input file5@€ 5Aÿÿ #þ:~Al5B reset flags6@€ 6Aÿÿ #;~Al6@7@€ )7AÿÿCê:~ConvertAš7Bdisable convert command8@H8APÿÿB78@P9@€ 9[email protected] :y€û:[email protected] EXIT_EXC2CRD:@p;@€ ;AÿÿBT;turn off error checking<@€ <AÿÿX$<Bmake sure input file is gone=@€ =AÿÿBT#=Bturn error checking back on>@>AÿÿB>Bshow standard menu bar?@?Bÿÿ
Cˆ|AÈ?Bdelete EXC2CRD menu bar
@Ҁÿ
BҀD
CҀ&
DҀ8
FҀL
GҀ'
HҀ4
JҀ.
KҀ&
LҀ4
NҀ.
OҀ/
PҀU
QҀ\
RҀR
SҀ2@@H@BPÿÿA6@BPreturn control to userB@€û B[email protected]EXITB@pC^€ CBÿÿX
CB hard exitD^€KDBPÿÿB7%DBPjust in case the user cancelsF@€û
F[email protected]ABOUTF[email protected]G@GBð? %À!À
A¡G@H@HHBPÿÿB7H@PJ|€û J[email protected]HELPJ@pK|KCÿÿ %ÀÀ
A¡K@L|HLBPÿÿB7L@PN@€û N[email protected]ShowN[email protected]-zO@OBÿÿ å>X«(OC This macro is used after exitingP@!PBÿÿ EXC2CRD.XLMX^(PC EXC2CRD to display the macro forQ@QBÿÿX+QC#inspection or, as is more often theR@RCÿÿ$XmR@S@HSCPÿÿB7SCPcase, more work...= €%A
>4KKK