From c5f28a081bdc11e3c65da272d60c2d06fa03ec81 Mon Sep 17 00:00:00 2001 From: Trowbridge Date: Wed, 20 Mar 2019 17:03:17 -0400 Subject: [PATCH] add individual part form --- part.frm | 48 ++++++++++++++++++++++++++++++++++++++++++++++++ part.frx | Bin 0 -> 2584 bytes 2 files changed, 48 insertions(+) create mode 100644 part.frm create mode 100644 part.frx diff --git a/part.frm b/part.frm new file mode 100644 index 0000000..f678245 --- /dev/null +++ b/part.frm @@ -0,0 +1,48 @@ +VERSION 5.00 +Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} part + Caption = "Part Picker" + ClientHeight = 1080 + ClientLeft = 120 + ClientTop = 465 + ClientWidth = 8100 + OleObjectBlob = "part.frx":0000 + StartUpPosition = 1 'CenterOwner +End +Attribute VB_Name = "part" +Attribute VB_GlobalNameSpace = False +Attribute VB_Creatable = False +Attribute VB_PredeclaredId = True +Attribute VB_Exposed = False + +Public part As String +Public bill As String +Public ship As String +Public useval As Boolean +Option Explicit + + +Private Sub cbPart_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) + + Select Case KeyCode + Case 13 + useval = True + Me.Hide + Case 27 + useval = False + Me.Hide + End Select + +End Sub + + + +Private Sub UserForm_Activate() + + useval = False + + cbPart.list = Application.transpose(Worksheets("mdata").Range("A2:A26267")) + + +End Sub + + diff --git a/part.frx b/part.frx new file mode 100644 index 0000000000000000000000000000000000000000..0b44b973534cb8ca40e37cded0492b860d200670 GIT binary patch literal 2584 zcmeHJ%}X0m5dXbwVzovz#Y(l8J$Mk2pwbV$h}tS*EvX{tO|nV+!nhi95s^m!0YC8I zr9ux<=uJ=F^wgvF;IU9eym=5>FM_VWNj6IqlpywC$t-W*ym`N!nKwH#ysp-K;3*th z(Sf-<;OCz2;Oj=kp|fE#P0(;@6@UswpJcl31zGL=m94xJDD z-d7rhJ9Z-(%mmznce4v+h9O%O+cwb5_Jdn+w6EkSawhTP7T7hh#A(cyD7<6*qnJPd z21c*pvROR4$N4=}Jnq;B+~mdobPtf8FMN*v{|LZcg${3t_X+>GyIFD=C?=0tVDBw3 zDH}FvJx7I03%kBAN387+TiufPi|T!=LSAoh*o+2KSAu?l&nsqGC60+k9xJpq)5py>o>P`xP zZ(`-HZ$!rplDwy)Guuxoje3q(9173T6*MAabtzv{>b*Px@aMCFCFT?>MdQ6nGUaCP z6X3^@P|Tb%2jhCX8H-No_5Ru<2i~917BwQ_a3rh;jL}Fajv~sEFu%P0b@