Inventory Alert System
Inventory Alert System
If Range("U5").Value < 12 Then MsgBox "0.9 Nacl 1L is less than 12!!", 48, "Warning...Warning..."
If Range("U7").Value < 12 Then MsgBox "0.9 Nacl 50ml is less than 12!!", 48, "Warning...Warning..."
If Range("U17").Value < 12 Then MsgBox "Adult diaper is less than 12!!", 48, "Warning...Warning..."
If Range("U92").Value < 12 Then MsgBox "Blade 10 is less than 12!!", 48, "Warning...Warning..."
If Range("U93").Value < 12 Then MsgBox "Blade 11 is less than 12!!", 48, "Warning...Warning..."
If Range("U94").Value < 12 Then MsgBox "Blade 15 is less than 12!!", 48, "Warning...Warning..."
If Range("U158").Value < 5 Then MsgBox "Chromic 2.0 DA is less than 5!!", 48, "Warning...Warning..."
If Range("U160").Value < 5 Then MsgBox "Chromic 2.0 R is less than 5!!", 48, "Warning...Warning..."
If Range("U161").Value < 5 Then MsgBox "Chromic 3.0 R is less than 5!!", 48, "Warning...Warning..."
If Range("U162").Value < 5 Then MsgBox "Chromic 3.0 C is less than 5!!", 48, "Warning...Warning..."
If Range("U163").Value < 5 Then MsgBox "Chromic 4.0 C is less than 5!!", 48, "Warning...Warning..."
If Range("U164").Value < 5 Then MsgBox "Chromic 4.0 R is less than 5!!", 48, "Warning...Warning..."
If Range("U210").Value < 8 Then MsgBox "D5 IMB 1L is less than 8!!", 48, "Warning...Warning..."
If Range("U210").Value < 8 Then MsgBox "D5 IMB 1L is less than 8!!", 48, "Warning...Warning..."
If Range("U212").Value < 8 Then MsgBox "D5 0.3NACL 1L is less than 8!!", 48, "Warning...Warning..."
If Range("U214").Value < 8 Then MsgBox "D5 0.9 NACL 1L is less than 8!!", 48, "Warning...Warning..."
If Range("U216").Value < 8 Then MsgBox "D5 LRS 1L is less than 8!!", 48, "Warning...Warning..."
If Range("U218").Value < 8 Then MsgBox "D5 NM 1L is less than 8!!", 48, "Warning...Warning..."
If Range("U220").Value < 8 Then MsgBox "D5 WATER 1L is less than 8!!", 48, "Warning...Warning..."
If Range("U388").Value < 8 Then MsgBox "INSYTE 18 is less than 8!!", 48, "Warning...Warning..."
If Range("U389").Value < 8 Then MsgBox "INSYTE 20 is less than 8!!", 48, "Warning...Warning..."
If Range("U390").Value < 8 Then MsgBox "INSYTE 22 is less than 8!!", 48, "Warning...Warning..."
If Range("U391").Value < 8 Then MsgBox "INSYTE 24 is less than 8!!", 48, "Warning...Warning..."
If Range("U392").Value < 8 Then MsgBox "INSYTE 26 is less than 8!!", 48, "Warning...Warning..."
If Range("U506").Value < 10 Then MsgBox "NG 20 is less than 10!!", 48, "Warning...Warning..."
If Range("U507").Value < 10 Then MsgBox "NG 21 is less than 10!!", 48, "Warning...Warning..."
If Range("U508").Value < 10 Then MsgBox "NG 23 is less than 10!!", 48, "Warning...Warning..."
If Range("U509").Value < 10 Then MsgBox "NG 25 is less than 10!!", 48, "Warning...Warning..."
If Range("U510").Value < 10 Then MsgBox "NG 26 is less than 10!!", 48, "Warning...Warning..."
If Range("U529").Value < 8 Then MsgBox "Nylon 2.0 R is less than 8!!", 48, "Warning...Warning..."
If Range("U530").Value < 8 Then MsgBox "Nylon 2.0 C is less than 8!!", 48, "Warning...Warning..."
If Range("U531").Value < 8 Then MsgBox "Nylon 3.0 C is less than 8!!", 48, "Warning...Warning..."
If Range("U532").Value < 8 Then MsgBox "Nylon 4.0 C is less than 8!!", 48, "Warning...Warning..."
If Range("U533").Value < 8 Then MsgBox "Nylon 4.0 R is less than 8!!", 48, "Warning...Warning..."
If Range("U535").Value < 8 Then MsgBox "Nylon 6.0 C is less than 8!!", 48, "Warning...Warning..."
If Range("U584").Value < 8 Then MsgBox "PLRS 1L is less than 8!!", 48, "Warning...Warning..."
If Range("U653").Value < 8 Then MsgBox "Silk 2.0 C is less than 8!!", 48, "Warning...Warning..."
If Range("U655").Value < 8 Then MsgBox "Silk 3.0 C is less than 8!!", 48, "Warning...Warning..."
If Range("U657").Value < 8 Then MsgBox "Silk 4.0 C is less than 8!!", 48, "Warning...Warning..."
If Range("U659").Value < 8 Then MsgBox "Silk 5.0 C is less than 8!!", 48, "Warning...Warning..."
If Range("U681").Value < 8 Then MsgBox "Sterile Gloves 6.0 is less than 8!!", 48, "Warning...Warning..."
If Range("U682").Value < 8 Then MsgBox "Sterile Gloves 6.5 is less than 8!!", 48, "Warning...Warning..."
If Range("U683").Value < 8 Then MsgBox "Sterile Gloves 7.0 is less than 8!!", 48, "Warning...Warning..."
If Range("U684").Value < 8 Then MsgBox "Sterile Gloves 7.5 is less than 8!!", 48, "Warning...Warning..."
If Range("U730").Value < 8 Then MsgBox "Urine Collector is less than 12!!", 48, "Warning...Warning..."
If Range("U8").Value < 40 Then MsgBox "10cc is less than 40!!", 48, "Warning...Warning..."
If Range("U9").Value < 50 Then MsgBox "1cc is less than 50!!", 48, "Warning...Warning..."
If Range("U10").Value < 50 Then MsgBox "3cc is less than 50!!", 48, "Warning...Warning..."
If Range("U12").Value < 50 Then MsgBox "5cc is less than 50!!", 48, "Warning...Warning..."
If Range("U6").Value < 3 Then MsgBox "0.9 NACL 500ML is less than 3!!", 48, "Warning...Warning..."
If Range("U57").Value < 3 Then MsgBox "Arm sling Large is less than 3!!", 48, "Warning...Warning..."
If Range("U58").Value < 3 Then MsgBox "Arm sling Medium is less than 3!!", 48, "Warning...Warning..."
If Range("U59").Value < 3 Then MsgBox "Arm sling Small is less than 3!!", 48, "Warning...Warning..."
If Range("U98").Value < 3 Then MsgBox "Butterfly gauge 21 is less than 3!!", 48, "Warning...Warning..."
If Range("U99").Value < 3 Then MsgBox "Butterfly gauge 23 is less than 3!!", 48, "Warning...Warning..."
If Range("U100").Value < 3 Then MsgBox "Butterfly gauge 25 is less than 3!!", 48, "Warning...Warning..."
If Range("U286").Value < 5 Then MsgBox "EQ Diaper XL is less than 5!!", 48, "Warning...Warning..."
If Range("U287").Value < 5 Then MsgBox "EQ Diaper Medium is less than 5!!", 48,
"Warning...Warning..."
If Range("U289").Value < 5 Then MsgBox "EQ Diaper small is less than 5!!", 48, "Warning...Warning..."
If Range("U312").Value < 2 Then MsgBox "Feeding tube Fr. 10 is less than 2!!", 48,
"Warning...Warning..."
If Range("U313").Value < 2 Then MsgBox "Feeding tube Fr. 14 is less than 2!!", 48,
"Warning...Warning..."
If Range("U314").Value < 2 Then MsgBox "Feeding tube Fr. 18 is less than 2!!", 48,
"Warning...Warning..."
If Range("U316").Value < 2 Then MsgBox "Feeding tube Fr. 16 is less than 2!!", 48,
"Warning...Warning..."
If Range("U317").Value < 2 Then MsgBox "Feeding tube Fr. 5 is less than 2!!", 48, "Warning...Warning..."
If Range("U319").Value < 2 Then MsgBox "Feeding tube Fr. 8 is less than 2!!", 48, "Warning...Warning..."
If Range("U329").Value < 2 Then MsgBox "Fleet Enema is less than 2!!", 48, "Warning...Warning..."
If Range("U473").Value < 5 Then MsgBox "Modess Single is less than 5!!", 48, "Warning...Warning..."
If Range("U474").Value < 5 Then MsgBox "Modess Maternity is less than 5!!", 48, "Warning...Warning..."
If Range("U274").Value < 5 Then MsgBox "El bandage 2 inches is less than 5!!", 48,
"Warning...Warning..."
If Range("U275").Value < 5 Then MsgBox "El bandage 4 inches is less than 5!!", 48,
"Warning...Warning..."
If Range("U276").Value < 5 Then MsgBox "El bandage 6 inches is less than 5!!", 48,
"Warning...Warning..."
If Range("U18").Value < 30 Then MsgBox "Airex 500 mg is less than 30!!", 48, "Warning...Warning..."
If Range("U21").Value < 20 Then MsgBox "Al + Mg tablet is less than 20!!", 48, "Warning...Warning..."
If Range("U22").Value < 20 Then MsgBox "Ambroxol 30 mg is less than 20!!", 48, "Warning...Warning..."
If Range("U23").Value < 20 Then MsgBox "Ambroxol 75 mg is less than 20!!", 48, "Warning...Warning..."
If Range("U35").Value < 30 Then MsgBox "Amlodipine 5 mg is less than 30!!", 48, "Warning...Warning..."
If Range("U41").Value < 30 Then MsgBox "Amoxicillin 500 mg is less than 30!!", 48,
"Warning...Warning..."
If Range("U50").Value < 10 Then MsgBox "Appebon + Iron capsule is less than 10!!", 48,
"Warning...Warning..."
If Range("U52").Value < 10 Then MsgBox "Appebon Plus capsule is less than 10!!", 48,
"Warning...Warning..."
If Range("U67").Value < 30 Then MsgBox "Aspirin 80 mg is less than 30!!", 48, "Warning...Warning..."
If Range("U60").Value < 30 Then MsgBox "Ascorbic acid tab is less than 30!!", 48, "Warning...Warning..."
If Range("U97").Value < 10 Then MsgBox "Buscopan tab is less than 10!!", 48, "Warning...Warning..."
If Range("U101").Value < 10 Then MsgBox "Calcium carbonate tab is less than 10!!", 48,
"Warning...Warning..."
If Range("U105").Value < 10 Then MsgBox "Captopril tab is less than 10!!", 48, "Warning...Warning..."
If Range("U109").Value < 10 Then MsgBox "Carbocisteine cap is less than 10!!", 48,
"Warning...Warning..."
If Range("U128").Value < 30 Then MsgBox "Cefalexin cap is less than 30!!", 48, "Warning...Warning..."
If Range("U135").Value < 30 Then MsgBox "Cefuroxime 500 cap is less than 30!!", 48,
"Warning...Warning..."
If Range("U129").Value < 20 Then MsgBox "Cefixime 200 mg cap is less than 20!!", 48,
"Warning...Warning..."
If Range("U144").Value < 30 Then MsgBox "Celecoxib 200 mg cap is less than 30!!", 48,
"Warning...Warning..."
If Range("U149").Value < 30 Then MsgBox "Cetirizine tab is less than 30!!", 48, "Warning...Warning..."
If Range("U154").Value < 30 Then MsgBox "Chloramphenicol 500 mg cap is less than 30!!", 48,
"Warning...Warning..."
If Range("U167").Value < 30 Then MsgBox "Ciprofloxacin 500 mg is less than 30!!", 48,
"Warning...Warning..."
If Range("U173").Value < 30 Then MsgBox "Clarithromycin 500 mg is less than 30!!", 48,
"Warning...Warning..."
If Range("U180").Value < 30 Then MsgBox "Clindamycin 300 mg is less than 30!!", 48,
"Warning...Warning..."
If Range("U182").Value < 20 Then MsgBox "Clonidine tab is less than 20!!", 48, "Warning...Warning..."
If Range("U184").Value < 30 Then MsgBox "Cloxacillin 500 mg is less than 30!!", 48,
"Warning...Warning..."
If Range("U196").Value < 20 Then MsgBox "Salresp is less than 20!!", 48, "Warning...Warning..."
If Range("U197").Value < 10 Then MsgBox "Combivent is less than 10!!", 48, "Warning...Warning..."
If Range("U235").Value < 30 Then MsgBox "Diclofenac tab is less than 30!!", 48, "Warning...Warning..."
If Range("U237").Value < 30 Then MsgBox "dicycloverine tab is less than 30!!", 48,
"Warning...Warning..."
If Range("U242").Value < 10 Then MsgBox "Dilfur tab is less than 10!!", 48, "Warning...Warning..."
If Range("U248").Value < 20 Then MsgBox "Diphenhydramine 50 mg cap is less than 20!!", 48,
"Warning...Warning..."
If Range("U271").Value < 30 Then MsgBox "Ectrin capsule is less than 30!!", 48, "Warning...Warning..."
If Range("U277").Value < 10 Then MsgBox "Eldicet is less than 10!!", 48, "Warning...Warning..."
If Range("U278").Value < 10 Then MsgBox "Enalapril 10 mg is less than 10!!", 48, "Warning...Warning..."
If Range("U293").Value < 10 Then MsgBox "Erythromycin 500 mg is less than 20!!", 48,
"Warning...Warning..."
If Range("U295").Value < 10 Then MsgBox "ESOMEPRAZOLE 20 MG is less than 10!!", 48,
"Warning...Warning..."
If Range("U297").Value < 10 Then MsgBox "Essentiale forte is less than 10!!", 48, "Warning...Warning..."
If Range("U299").Value < 20 Then MsgBox "Etoricoxib 120 mg is less than 20!!", 48,
"Warning...Warning..."
If Range("U301").Value < 30 Then MsgBox "Co-amoxiclav tab is less than 30!!", 48,
"Warning...Warning..."
If Range("U324").Value < 20 Then MsgBox "Ferrous sulfate tab is less than 20!!", 48,
"Warning...Warning..."
If Range("U332").Value < 10 Then MsgBox "Fluimucil 600 mg is less than 10!!", 48,
"Warning...Warning..."
If Range("U332").Value < 10 Then MsgBox "Fluimucil 200 mg is less than 10!!", 48,
"Warning...Warning..."
If Range("U342").Value < 20 Then MsgBox "Furazolidone tab is less than 20!!", 48,
"Warning...Warning..."
If Range("U345").Value < 20 Then MsgBox "Furosemide tab is less than 20!!", 48, "Warning...Warning..."
If Range("U359").Value < 20 Then MsgBox "Tranexamic acid capsule is less than 20!!", 48,
"Warning...Warning..."
If Range("U364").Value < 20 Then MsgBox "Hivent is less than 20!!", 48, "Warning...Warning..."
If Range("U369").Value < 20 Then MsgBox "Hydrite sachet is less than 20!!", 48, "Warning...Warning..."
If Range("U374").Value < 30 Then MsgBox "Hyoscine tab is less than 30!!", 48, "Warning...Warning..."
If Range("U381").Value < 20 Then MsgBox "Ibuprofen 200 mg is less than 20!!", 48,
"Warning...Warning..."
If Range("U380").Value < 20 Then MsgBox "Ibuprofen 400 mg is less than 20!!", 48,
"Warning...Warning..."
If Range("U384").Value < 10 Then MsgBox "Inoflox 200 mg is less than 10!!", 48, "Warning...Warning..."
If Range("U385").Value < 10 Then MsgBox "Inoflox 400 mg is less than 10!!", 48, "Warning...Warning..."
If Range("U397").Value < 20 Then MsgBox "Isordil 10 mg is less than 20!!", 48, "Warning...Warning..."
If Range("U398").Value < 20 Then MsgBox "Isordil 5 mg is less than 20!!", 48, "Warning...Warning..."
If Range("U399").Value < 20 Then MsgBox "ISMN 30 mg is less than 20!!", 48, "Warning...Warning..."
If Range("U403").Value < 10 Then MsgBox "Iterax 10 mg is less than 10!!", 48, "Warning...Warning..."
If Range("U404").Value < 10 Then MsgBox "Iterax 25 mg is less than 10!!", 48, "Warning...Warning..."
If Range("U408").Value < 20 Then MsgBox "Ketosteril tab is less than 20!!", 48, "Warning...Warning..."
If Range("U409").Value < 30 Then MsgBox "Ketorolac 10 tab is less than 30!!", 48,
"Warning...Warning..."
If Range("U414").Value < 20 Then MsgBox "Kremil-s tab is less than 20!!", 48, "Warning...Warning..."
If Range("U415").Value < 20 Then MsgBox "KY Jelly tab is less than 20!!", 48, "Warning...Warning..."
If Range("U417").Value < 10 Then MsgBox "Lanoxin tab is less than 10!!", 48, "Warning...Warning..."
If Range("U422").Value < 10 Then MsgBox "Levofloxacin 500mg tab is less than 10!!", 48,
"Warning...Warning..."
If Range("U424").Value < 20 Then MsgBox "Levocetirizine tab is less than 20!!", 48,
"Warning...Warning..."
If Range("U427").Value < 30 Then MsgBox "Lexibase 500 mg is less than 30!!", 48,
"Warning...Warning..."
If Range("U434").Value < 30 Then MsgBox "Losartan 50 mg is less than 30!!", 48, "Warning...Warning..."
If Range("U435").Value < 15 Then MsgBox "Combizar tab is less than 15!!", 48, "Warning...Warning..."
If Range("U436").Value < 10 Then MsgBox "Macroset is less than 10!!", 48, "Warning...Warning..."
If Range("U440").Value < 10 Then MsgBox "Medicine cup is less than 10!!", 48, "Warning...Warning..."
If Range("U444").Value < 10 Then MsgBox "Medrol 4mg tab is less than 10!!", 48, "Warning...Warning..."
If Range("U446").Value < 20 Then MsgBox "Mefenamic acid 250 mg is less than 20!!", 48,
"Warning...Warning..."
If Range("U447").Value < 30 Then MsgBox "Mefenamic acid 500 mg is less than 30!!", 48,
"Warning...Warning..."
If Range("U451").Value < 10 Then MsgBox "Meloxicam 7.5 mg is less than 10!!", 48,
"Warning...Warning..."
If Range("U453").Value < 30 Then MsgBox "Metformin 500 mg is less than 30!!", 48,
"Warning...Warning..."
If Range("U457").Value < 10 Then MsgBox "Methyldopa 125 mg is less than 10!!", 48,
"Warning...Warning..."
If Range("U458").Value < 20 Then MsgBox "Methergin tab is less than 20!!", 48, "Warning...Warning..."
If Range("U462").Value < 30 Then MsgBox "Metoclopramide tab is less than 30!!", 48,
"Warning...Warning..."
If Range("U465").Value < 30 Then MsgBox "Metronidazole tab is less than 30!!", 48,
"Warning...Warning..."
If Range("U467").Value < 20 Then MsgBox "Micardis 40 mg is less than 20!!", 48, "Warning...Warning..."
If Range("U469").Value < 20 Then MsgBox "Micadis plus is less than 20!!", 48, "Warning...Warning..."
If Range("U470").Value < 10 Then MsgBox "micropore is less than 10!!", 48, "Warning...Warning..."
If Range("U471").Value < 10 Then MsgBox "Microset is less than 10!!", 48, "Warning...Warning..."
If Range("U489").Value < 10 Then MsgBox "Mucosta tab is less than 10!!", 48, "Warning...Warning..."
If Range("U493").Value < 20 Then MsgBox "Myonal tab is less than 20!!", 48, "Warning...Warning..."
If Range("U502").Value < 20 Then MsgBox "Natravox 625 mg tab is less than 20!!", 48,
"Warning...Warning..."
If Range("U515").Value < 30 Then MsgBox "Neurobase tab is less than 30!!", 48, "Warning...Warning..."
If Range("U519").Value < 20 Then MsgBox "Nifedipine tab is less than 20!!", 48, "Warning...Warning..."
If Range("U520").Value < 10 Then MsgBox "Ercefuryl capsule is less than 10!!", 48,
"Warning...Warning..."
If Range("U523").Value < 30 Then MsgBox "Clopidogrel tab is less than 30!!", 48, "Warning...Warning..."
If Range("U539").Value < 30 Then MsgBox "Ofloxacin 200 mg is less than 30!!", 48,
"Warning...Warning..."
If Range("U541").Value < 30 Then MsgBox "Ofloxacin 400 mg is less than 30!!", 48,
"Warning...Warning..."
If Range("U550").Value < 20 Then MsgBox "Opigesic 250 mg supp. is less than 20!!", 48,
"Warning...Warning..."
If Range("U554").Value < 10 Then MsgBox "Oxygen Cannula Adult is less than 10!!", 48,
"Warning...Warning..."
If Range("U555").Value < 10 Then MsgBox "Oxygen Cannula Pedia is less than 10!!", 48,
"Warning...Warning..."
If Range("U556").Value < 5 Then MsgBox "Oxygen Cannula Adult + mask is less than 5!!", 48,
"Warning...Warning..."
If Range("U557").Value < 5 Then MsgBox "Oxygen Cannula Pedia + mask is less than 5!!", 48,
"Warning...Warning..."
If Range("U558").Value < 30 Then MsgBox "Oxytocin amp is less than 30!!", 48, "Warning...Warning..."
If Range("U560").Value < 30 Then MsgBox "Paracetamol + Tramadol tab is less than 30!!", 48,
"Warning...Warning..."
If Range("U562").Value < 30 Then MsgBox "Pradonal tab is less than 30!!", 48, "Warning...Warning..."
If Range("U563").Value < 30 Then MsgBox "Paracetamol 500 mg tab is less than 30!!", 48,
"Warning...Warning..."
If Range("U568").Value < 30 Then MsgBox "Paracetamol + Ibuprofen cap is less than 30!!", 48,
"Warning...Warning..."
If Range("U581").Value < 5 Then MsgBox "Feldene Flash tab is less than 5!!", 48, "Warning...Warning..."
If Range("U583").Value < 20 Then MsgBox "Piracetam 400 mg supp. is less than 20!!", 48,
"Warning...Warning..."
If Range("U587").Value < 30 Then MsgBox "Ponser 500 mg tab is less than 30!!", 48,
"Warning...Warning..."
If Range("U590").Value < 30 Then MsgBox "Potassium chloride 600 mg tab is less than 30!!", 48,
"Warning...Warning..."
If Range("U591").Value < 20 Then MsgBox "Potassium citrate tab is less than 20!!", 48,
"Warning...Warning..."
If Range("U592").Value < 10 Then MsgBox "Prednisone 5 mg tab is less than 10!!", 48,
"Warning...Warning..."
If Range("U594").Value < 20 Then MsgBox "Prednisone 20 mg tab is less than 20!!", 48,
"Warning...Warning..."
If Range("U609").Value < 30 Then MsgBox "Propranolol 10mg tab is less than 30!!", 48,
"Warning...Warning..."
If Range("U610").Value < 10 Then MsgBox "Protexin restore tab is less than 10!!", 48,
"Warning...Warning..."
If Range("U611").Value < 20 Then MsgBox "Protexin balance tab is less than 20!!", 48,
"Warning...Warning..."
If Range("U614").Value < 30 Then MsgBox "Provinerve tab is less than 30!!", 48, "Warning...Warning..."
If Range("U617").Value < 30 Then MsgBox "Prozin 500 mg tab is less than 30!!", 48,
"Warning...Warning..."
If Range("U622").Value < 30 Then MsgBox "Ranitidine 150 mg tab is less than 30!!", 48,
"Warning...Warning..."
If Range("U631").Value < 10 Then MsgBox "Risek insta sachet is less than 10!!", 48,
"Warning...Warning..."
If Range("U632").Value < 20 Then MsgBox "Risek 20 mg is less than 20!!", 48, "Warning...Warning..."
If Range("U634").Value < 50 Then MsgBox "Rivotril tab is less than 50!!", 48, "Warning...Warning..."
If Range("U635").Value < 10 Then MsgBox "Rowatinex capsule is less than 10!!", 48,
"Warning...Warning..."
If Range("U644").Value < 30 Then MsgBox "Salbutamol + Guiafenesin cap is less than 30!!", 48,
"Warning...Warning..."
If Range("U647").Value < 30 Then MsgBox "Sambong forte is less than 30!!", 48, "Warning...Warning..."
If Range("U650").Value < 10 Then MsgBox "Serc 16 mg tab is less than 10!!", 48, "Warning...Warning..."
If Range("U663").Value < 30 Then MsgBox "Sinecod forte is less than 30!!", 48, "Warning...Warning..."
If Range("U666").Value < 10 Then MsgBox "Sodium bicarbonate 650 mg tab is less than 10!!", 48,
"Warning...Warning..."
If Range("U670").Value < 30 Then MsgBox "Solmux broncho is less than 30!!", 48, "Warning...Warning..."
If Range("U673").Value < 10 Then MsgBox "Soluset is less than 10!!", 48, "Warning...Warning..."
If Range("U685").Value < 10 Then MsgBox "Sterile water is less than 10!!", 48, "Warning...Warning..."
If Range("U704").Value < 30 Then MsgBox "Tetanus toxoid is less than 30!!", 48, "Warning...Warning..."
If Range("U713").Value < 10 Then MsgBox "Tozam tab is less than 10!!", 48, "Warning...Warning..."
If Range("U714").Value < 10 Then MsgBox "Trajenta tab is less than 10!!", 48, "Warning...Warning..."
If Range("U716").Value < 20 Then MsgBox "Tramadol 50 mg caps is less than 20!!", 48,
"Warning...Warning..."
If Range("U719").Value < 10 Then MsgBox "Transderm patch is less than 10!!", 48,
"Warning...Warning..."
If Range("U726").Value < 10 Then MsgBox "Insulin syringe is less than 10!!", 48, "Warning...Warning..."
If Range("U728").Value < 10 Then MsgBox "Twynsta tablet is less than 10!!", 48, "Warning...Warning..."
If Range("U732").Value < 50 Then MsgBox "Valium ampule is less than 50!!", 48, "Warning...Warning..."
If Range("U745").Value < 10 Then MsgBox "Vestar tablet is less than 10!!", 48, "Warning...Warning..."
If Range("U749").Value < 30 Then MsgBox "Vitamin B complex tab is less than 30!!", 48,
"Warning...Warning..."
If Range("U767").Value < 10 Then MsgBox "Zykast tablet is less than 10!!", 48, "Warning...Warning..."
If Range("U11").Value < 1 Then MsgBox "50cc is less than 1!!", 48, "Warning...Warning..."
If Range("U13").Value < 1 Then MsgBox "Abdominal binder is less than 1!!", 48, "Warning...Warning..."
If Range("U19").Value < 2 Then MsgBox "Allopurinol 100 mg is less than 2!!", 48, "Warning...Warning..."
If Range("U20").Value < 10 Then MsgBox "Allopurinol 300 mg is less than 10!!", 48,
"Warning...Warning..."
If Range("U24").Value < 2 Then MsgBox "Ambroxol drops is less than 2!!", 48, "Warning...Warning..."
If Range("U25").Value < 2 Then MsgBox "Ambroxol 15 mg/5ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U26").Value < 2 Then MsgBox "Ambroxol 30 mg/5ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U27").Value < 0 Then MsgBox "Amikacin 100mg/amp is less than 0!!", 48,
"Warning...Warning..."
If Range("U28").Value < 10 Then MsgBox "Amikacin 125mg/amp is less than 10!!", 48,
"Warning...Warning..."
If Range("U29").Value < 10 Then MsgBox "Amikacin 250mg/amp is less than 10!!", 48,
"Warning...Warning..."
If Range("U30").Value < 3 Then MsgBox "Aminogen-S is less than 3!!", 48, "Warning...Warning..."
If Range("U31").Value < 3 Then MsgBox "Aminophylline amp is less than 3!!", 48, "Warning...Warning..."
If Range("U32").Value < 3 Then MsgBox "Amiodarone amp is less than 3!!", 48, "Warning...Warning..."
If Range("U33").Value < 3 Then MsgBox "Cordarone is less than 3!!", 48, "Warning...Warning..."
If Range("U37").Value < 2 Then MsgBox "Amoxicillin drops is less than 2!!", 48, "Warning...Warning..."
If Range("U38").Value < 2 Then MsgBox "Amoxicillin 125mg/5ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U39").Value < 2 Then MsgBox "Amoxicillin 250mg/5ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U40").Value < 10 Then MsgBox "Amoxicillin 250mg caps is less than 10!!", 48,
"Warning...Warning..."
If Range("U42").Value < 10 Then MsgBox "Ampicillin 250mg/vial is less than 10!!", 48,
"Warning...Warning..."
If Range("U44").Value < 10 Then MsgBox "Ampicillin 500mg/vial is less than 10!!", 48,
"Warning...Warning..."
If Range("U45").Value < 5 Then MsgBox "Ampicillin + sulbactam vial is less than 5!!", 48,
"Warning...Warning..."
If Range("U46").Value < 2 Then MsgBox "Anpechlor susp. is less than 2!!", 48, "Warning...Warning..."
If Range("U47").Value < 2 Then MsgBox "Antivenom is less than 2!!", 48, "Warning...Warning..."
If Range("U49").Value < 2 Then MsgBox "Aplosyn otic is less than 2!!", 48, "Warning...Warning..."
If Range("U51").Value < 2 Then MsgBox "Appebon+Iron syrup is less than 2!!", 48,
"Warning...Warning..."
If Range("U53").Value < 2 Then MsgBox "Appetite plus syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U55").Value < 5 Then MsgBox "Arcoxia 120 mg tab is less than 5!!", 48, "Warning...Warning..."
If Range("U56").Value < 5 Then MsgBox "Arcoxia 90 mg tab is less than 5!!", 48, "Warning...Warning..."
If Range("U61").Value < 2 Then MsgBox "Ascorbic acid drops is less than 2!!", 48, "Warning...Warning..."
If Range("U62").Value < 2 Then MsgBox "Ascorbic acid syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U64").Value < 2 Then MsgBox "Ascorbic acid + zinc drops is less than 2!!", 48,
"Warning...Warning..."
If Range("U66").Value < 2 Then MsgBox "Asepto syringe is less than 2!!", 48, "Warning...Warning..."
If Range("U70").Value < 3 Then MsgBox "Atrophine sulfate amp is less than 3!!", 48,
"Warning...Warning..."
If Range("U71").Value < 50 Then MsgBox "ATS 1,500 amp is less than 50!!", 48, "Warning...Warning..."
If Range("U75").Value < 2 Then MsgBox "Azithromycin 200 mg/5ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U76").Value < 10 Then MsgBox "Azithromycin natrapharm is less than 10!!", 48,
"Warning...Warning..."
If Range("U77").Value < 10 Then MsgBox "Azithromycin tab is less than 10!!", 48, "Warning...Warning..."
If Range("U82").Value < 2 Then MsgBox "Betadine 60 ml is less than 2!!", 48, "Warning...Warning..."
If Range("U83").Value < 2 Then MsgBox "Betadine 7.5 ml is less than 2!!", 48, "Warning...Warning..."
If Range("U85").Value < 20 Then MsgBox "Betahistine 8 mg is less than 20!!", 48, "Warning...Warning..."
If Range("U87").Value < 2 Then MsgBox "Betamethasone cream is less than 2!!", 48,
"Warning...Warning..."
If Range("U90").Value < 30 Then MsgBox "Biogesic 500mg is less than 30!!", 48, "Warning...Warning..."
If Range("U95").Value < 2 Then MsgBox "Bricanyl amp is less than 2!!", 48, "Warning...Warning..."
If Range("U96").Value < 20 Then MsgBox "Budesonide is less than 20!!", 48, "Warning...Warning..."
If Range("U103").Value < 2 Then MsgBox "Calcium gluconate amp is less than 2!!", 48,
"Warning...Warning..."
If Range("U106").Value < 2 Then MsgBox "Carbocisteine drops is less than 2!!", 48,
"Warning...Warning..."
If Range("U108").Value < 2 Then MsgBox "Carbocisteine syrup is less than 2!!", 48,
"Warning...Warning..."
If Range("U112").Value < 3 Then MsgBox "Catapress amp is less than 3!!", 48, "Warning...Warning..."
If Range("U114").Value < 10 Then MsgBox "Cecon zinc is less than 10!!", 48, "Warning...Warning..."
If Range("U115").Value < 2 Then MsgBox "Ceelin drops is less than 2!!", 48, "Warning...Warning..."
If Range("U116").Value < 2 Then MsgBox "Ceelin syrup 60 ml is less than 2!!", 48, "Warning...Warning..."
If Range("U117").Value < 0 Then MsgBox "Ceelin syrup 120 ml- no stocks!!", 48, "Warning...Warning..."
If Range("U118").Value < 2 Then MsgBox "Ceelin plus syrup 60 ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U119").Value < 0 Then MsgBox "Ceelin plus syrup 120 ml- no stocks!!", 48,
"Warning...Warning..."
If Range("U120").Value < 20 Then MsgBox "Ceelin plus chewable is less than 20!!", 48,
"Warning...Warning..."
If Range("U123").Value < 2 Then MsgBox "Cefaclor 250 mg/5ml susp. 60 ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U121").Value < 2 Then MsgBox "Cefaclor drops is less than 2!!", 48, "Warning...Warning..."
If Range("U124").Value < 2 Then MsgBox "Cefalexin drops is less than 2!!", 48, "Warning...Warning..."
If Range("U126").Value < 2 Then MsgBox "Cefalexin 250 mg/5ml susp. 60 ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U130").Value < 2 Then MsgBox "Cefixime drops is less than 2!!", 48, "Warning...Warning..."
If Range("U131").Value < 2 Then MsgBox "Cefixime 100mg/5ml susp. 60 ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U132").Value < 10 Then MsgBox "Ceftazedime vial is less than 10!!", 48,
"Warning...Warning..."
If Range("U133").Value < 10 Then MsgBox "Ceftriaxone vial is less than 10!!", 48, "Warning...Warning..."
If Range("U134").Value < 1 Then MsgBox "Rocephine vial is less than 1!!", 48, "Warning...Warning..."
If Range("U137").Value < 2 Then MsgBox "Cefuroxime 125 mg/5ml susp. 60 ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U139").Value < 2 Then MsgBox "Cefuroxime 250 mg/5ml susp. 60 ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U140").Value < 10 Then MsgBox "Cefuroxime 750 mg/vial is less than 10!!", 48,
"Warning...Warning..."
If Range("U141").Value < 1 Then MsgBox "Cefuroxime (Zinacef) 750 mg/vial is less than 1!!", 48,
"Warning...Warning..."
If Range("U142").Value < 10 Then MsgBox "Celcoxx 200 mg is less than 10!!", 48, "Warning...Warning..."
If Range("U143").Value < 20 Then MsgBox "Celecoxib 400 mg is less than 20!!", 48,
"Warning...Warning..."
If Range("U150").Value < 2 Then MsgBox "Cetirizine drops is less than 2!!", 48, "Warning...Warning..."
If Range("U151").Value < 2 Then MsgBox "Cetirizine syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U152").Value < 5 Then MsgBox "Chloramphenicol 1 gm vial is less than 5!!", 48,
"Warning...Warning..."
If Range("U155").Value < 2 Then MsgBox "Chloramphenicol 125mg/5ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U166").Value < 5 Then MsgBox "Ciprofloxacin vial is less than 5!!", 48, "Warning...Warning..."
If Range("U168").Value < 1 Then MsgBox "Ciprobay vial is less than 1!!", 48, "Warning...Warning..."
If Range("U169").Value < 10 Then MsgBox "Citicholine 500 mg tab is less than 10!!", 48,
"Warning...Warning..."
If Range("U170").Value < 3 Then MsgBox "Citicholine amp is less than 3!!", 48, "Warning...Warning..."
If Range("U171").Value < 2 Then MsgBox "Clarithromycin 125 mg/5ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U172").Value < 2 Then MsgBox "Clarithromycin 250 mg/5ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U1714").Value < 0 Then MsgBox "Clavicle brace medium (expensive) no stocks!!", 48,
"Warning...Warning..."
If Range("U1714").Value < 0 Then MsgBox "Clavicle brace large (expensive) no stocks!!", 48,
"Warning...Warning..."
If Range("U179").Value < 10 Then MsgBox "Clindamycin 150 mg caps is less than 10!!", 48,
"Warning...Warning..."
If Range("U181").Value < 2 Then MsgBox "Clindamycin amp is less than 2!!", 48, "Warning...Warning..."
If Range("U183").Value < 10 Then MsgBox "Cloxacillin 250 mg caps is less than 10!!", 48,
"Warning...Warning..."
If Range("U185").Value < 2 Then MsgBox "Clobetasol cream is less than 2!!", 48, "Warning...Warning..."
If Range("U187").Value < 2 Then MsgBox "Cloxacillin 250mg/5ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U190").Value < 2 Then MsgBox "Co-amoxiclav 125mg/5ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U191").Value < 2 Then MsgBox "Co-amoxiclav 250mg/5ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U192").Value < 2 Then MsgBox "Co-amoxiclav vial is less than 2!!", 48, "Warning...Warning..."
If Range("U201").Value < 20 Then MsgBox "Conzace capsule is less than 20!!", 48,
"Warning...Warning..."
If Range("U202").Value < 10 Then MsgBox "Cord clamp is less than 10!!", 48, "Warning...Warning..."
If Range("U203").Value < 2 Then MsgBox "Cotrimoxazole 400mg/80mg/5ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U204").Value < 2 Then MsgBox "Cotrimoxazole 200mg/40mg/5ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U205").Value < 20 Then MsgBox "Cotrimoxazole 800mg tab is less than 20!!", 48,
"Warning...Warning..."
If Range("U207").Value < 20 Then MsgBox "Cotrimoxazole 400mg tab is less than 20!!", 48,
"Warning...Warning..."
If Range("U118").Value < 0 Then MsgBox "Clavicle brace large(cheapest) no stocks!!", 48,
"Warning...Warning..."
If Range("U209").Value < 1 Then MsgBox "Cutasept is less than 1!!", 48, "Warning...Warning..."
If Range("U211").Value < 5 Then MsgBox "D5IMB 500cc is less than 5!!", 48, "Warning...Warning..."
If Range("U215").Value < 5 Then MsgBox "D5050 is less than 5!!", 48, "Warning...Warning..."
If Range("U221").Value < 3 Then MsgBox "D5W 250cc is less than 3!!", 48, "Warning...Warning..."
If Range("U222").Value < 5 Then MsgBox "D5W 500cc is less than 5!!", 48, "Warning...Warning..."
If Range("U223").Value < 5 Then MsgBox "D10W 500cc is less than 5!!", 48, "Warning...Warning..."
If Range("U225").Value < 10 Then MsgBox "Daflon tab is less than 10!!", 48, "Warning...Warning..."
If Range("U226").Value < 10 Then MsgBox "Difflam lozenges is less than 10!!", 48,
"Warning...Warning..."
If Range("U229").Value < 1 Then MsgBox "Dental needle is less than 1!!", 48, "Warning...Warning..."
If Range("U230").Value < 2 Then MsgBox "Dexamethasone capsule is less than 2!!", 48,
"Warning...Warning..."
If Range("U231").Value < 8 Then MsgBox "Dexamethasone amp is less than 8!!", 48,
"Warning...Warning..."
If Range("U215").Value < 10 Then MsgBox "Diamicron 60mg is less than 10!!", 48,
"Warning...Warning..."
If Range("U236").Value < 1 Then MsgBox "Voltaren gel is less than 1!!", 48, "Warning...Warning..."
If Range("U238").Value < 2 Then MsgBox "Dicycloverine syrup is less than 2!!", 48,
"Warning...Warning..."
If Range("U243").Value < 2 Then MsgBox "Dilfur susp. is less than 2!!", 48, "Warning...Warning..."
If Range("U244").Value < 10 Then MsgBox "Dimezine tab is less than 10!!", 48, "Warning...Warning..."
If Range("U246").Value < 2 Then MsgBox "Diphenhydramine syrup is less than 2!!", 48,
"Warning...Warning..."
If Range("U249").Value < 10 Then MsgBox "Diphenhydramine amp is less than 10!!", 48,
"Warning...Warning..."
If Range("U251").Value < 2 Then MsgBox "Disudrin drops is less than 2!!", 48, "Warning...Warning..."
If Range("U252").Value < 2 Then MsgBox "Disudrin syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U254").Value < 3 Then MsgBox "Dobutamine vial is less than 3!!", 48, "Warning...Warning..."
If Range("U256").Value < 2 Then MsgBox "Dolan 100mg/5ml syrup is less than 2!!", 48,
"Warning...Warning..."
If Range("U257").Value < 2 Then MsgBox "Dolan forte 200mg/5ml syrup is less than 2!!", 48,
"Warning...Warning..."
If Range("U261").Value < 5 Then MsgBox "Dopamine amp is less than 5!!", 48, "Warning...Warning..."
If Range("U262").Value < 50 Then MsgBox "Dormicum amp is less than 50!!", 48, "Warning...Warning..."
If Range("U263").Value < 30 Then MsgBox "Doxycycline capsule is less than 30!!", 48,
"Warning...Warning..."
If Range("U266").Value < 20 Then MsgBox "Dulcolax 10 mg supp is less than 20!!", 48,
"Warning...Warning..."
If Range("U268").Value < 20 Then MsgBox "Dulcolax 5 mg supp is less than 20!!", 48,
"Warning...Warning..."
If Range("U267").Value < 10 Then MsgBox "Dulcolax 5 mg tab is less than 10!!", 48,
"Warning...Warning..."
If Range("U269").Value < 10 Then MsgBox "Duphaston tab is less than 10!!", 48, "Warning...Warning..."
If Range("U270").Value < 10 Then MsgBox "Duvadilan tab is less than 10!!", 48, "Warning...Warning..."
If Range("U272").Value < 2 Then MsgBox "Efamed syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U273").Value < 2 Then MsgBox "Efamed plus syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U283").Value < 1 Then MsgBox "Ephedrine amp is less than 1!!", 48, "Warning...Warning..."
If Range("U284").Value < 10 Then MsgBox "Epinephrine amp is less than 10!!", 48,
"Warning...Warning..."
If Range("U290").Value < 2 Then MsgBox "Equirab is less than 2!!", 48, "Warning...Warning..."
If Range("U291").Value < 10 Then MsgBox "Erceflora is less than 10!!", 48, "Warning...Warning..."
If Range("U292").Value < 2 Then MsgBox "Erythromycin ointment is less than 2!!", 48,
"Warning...Warning..."
If Range("U294").Value < 2 Then MsgBox "Erythromycin susp. is less than 2!!", 48,
"Warning...Warning..."
If Range("U303").Value < 2 Then MsgBox "Expel syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U304").Value < 2 Then MsgBox "Expel drops is less than 2!!", 48, "Warning...Warning..."
If Range("U306").Value < 6 Then MsgBox "Eye patch is less than 6!!", 48, "Warning...Warning..."
If Range("U307").Value < 2 Then MsgBox "E-zinc syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U308").Value < 2 Then MsgBox "E-zinc drops is less than 2!!", 48, "Warning...Warning..."
If Range("U309").Value < 60 Then MsgBox "Facemask is less than 60!!", 48, "Warning...Warning..."
If Range("U310").Value < 2 Then MsgBox "Fastum gel is less than 2!!", 48, "Warning...Warning..."
If Range("U322").Value < 2 Then MsgBox "Ferlin syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U323").Value < 2 Then MsgBox "Ferlin drops is less than 2!!", 48, "Warning...Warning..."
If Range("U326").Value < 10 Then MsgBox "Fixcom 4 is less than 10!!", 48, "Warning...Warning..."
If Range("U327").Value < 2 Then MsgBox "Flagyl susp. is less than 2!!", 48, "Warning...Warning..."
If Range("U331").Value < 5 Then MsgBox "Fluimucil 100 mg is less than 5!!", 48, "Warning...Warning..."
If Range("U334").Value < 5 Then MsgBox "Foley cath fr.18 is less than 5!!", 48, "Warning...Warning..."
If Range("U335").Value < 5 Then MsgBox "Foley cath fr.16 is less than 5!!", 48, "Warning...Warning..."
If Range("U336").Value < 5 Then MsgBox "Foley cath fr.14 is less than 5!!", 48, "Warning...Warning..."
If Range("U341").Value < 2 Then MsgBox "Fucithalmic ointment is less than 2!!", 48,
"Warning...Warning..."
If Range("U343").Value < 2 Then MsgBox "Furazolidone susp. is less than 2!!", 48, "Warning...Warning..."
If Range("U344").Value < 10 Then MsgBox "Furosemide amp is less than 10!!", 48,
"Warning...Warning..."
If Range("U346").Value < 5 Then MsgBox "Gabix 100 mg is less than 5!!", 48, "Warning...Warning..."
If Range("U347").Value < 5 Then MsgBox "Gabix 300 mg is less than 5!!", 48, "Warning...Warning..."
If Range("U348").Value < 5 Then MsgBox "Gaviscon sachet is less than 5!!", 48, "Warning...Warning..."
If Range("U350").Value < 5 Then MsgBox "Gentamicin amp is less than 5!!", 48, "Warning...Warning..."
If Range("U351").Value < 2 Then MsgBox "Gentamicin otic sol'n is less than 2!!", 48,
"Warning...Warning..."
If Range("U355").Value < 5 Then MsgBox "Godex capsule is less than 5!!", 48, "Warning...Warning..."
If Range("U356").Value < 5 Then MsgBox "Godex DS capsule is less than 5!!", 48, "Warning...Warning..."
If Range("U357").Value < 30 Then MsgBox "Haircap is less than 30!!", 48, "Warning...Warning..."
If Range("U358").Value < 2 Then MsgBox "Haloperidol amp is less than 2!!", 48, "Warning...Warning..."
If Range("U360").Value < 10 Then MsgBox "Heplock is less than 10!!", 48, "Warning...Warning..."
If Range("U361").Value < 10 Then MsgBox "Heraclene 1 mg supp is less than 10!!", 48,
"Warning...Warning..."
If Range("U362").Value < 10 Then MsgBox "Heraclene 3 mg supp is less than 10!!", 48,
"Warning...Warning..."
If Range("U365").Value < 100 Then MsgBox "Humulin-R is less than 100!!", 48, "Warning...Warning..."
If Range("U366").Value < 2 Then MsgBox "Hyclens OB wash is less than 2!!", 48, "Warning...Warning..."
If Range("U367").Value < 2 Then MsgBox "Hyclens wound spray is less than 2!!", 48,
"Warning...Warning..."
If Range("U368").Value < 5 Then MsgBox "Hydralazine amp is less than 5!!", 48, "Warning...Warning..."
If Range("U370").Value < 10 Then MsgBox "Hydrocortisone 100 mg vial is less than 10!!", 48,
"Warning...Warning..."
If Range("U371").Value < 10 Then MsgBox "Hydrocortisone 250 mg vial is less than 10!!", 48,
"Warning...Warning..."
If Range("U372").Value < 2 Then MsgBox "Hydrocortisone cream is less than 2!!", 48,
"Warning...Warning..."
If Range("U375").Value < 2 Then MsgBox "Hyoscine suspension is less than 2!!", 48,
"Warning...Warning..."
If Range("U376").Value < 15 Then MsgBox "Hyoscine amp is less than 15!!", 48, "Warning...Warning..."
If Range("U377").Value < 30 Then MsgBox "Iberet + folic capsule is less than 30!!", 48,
"Warning...Warning..."
If Range("U378").Value < 2 Then MsgBox "Ibuprofen 100 mg/5ml syrup is less than 2!!", 48,
"Warning...Warning..."
If Range("U379").Value < 2 Then MsgBox "Ibuprofen 200 mg/5ml syrup is less than 2!!", 48,
"Warning...Warning..."
If Range("U382").Value < 2 Then MsgBox "Ilosone drops is less than 2!!", 48, "Warning...Warning..."
If Range("U393").Value < 5 Then MsgBox "Intertulle is less than 5!!", 48, "Warning...Warning..."
If Range("U396").Value < 3 Then MsgBox "Isoket amp is less than 3!!", 48, "Warning...Warning..."
If Range("U402").Value < 4 Then MsgBox "Isoxilan amp is less than 4!!", 48, "Warning...Warning..."
If Range("U410").Value < 10 Then MsgBox "Ketorolac amp is less than 10!!", 48, "Warning...Warning..."
If Range("U416").Value < 3 Then MsgBox "Lanoxin amp is less than 3!!", 48, "Warning...Warning..."
If Range("U420").Value < 50 Then MsgBox "Latex is less than 50!!", 48, "Warning...Warning..."
If Range("U421").Value < 15 Then MsgBox "Synactiv tab is less than 15!!", 48, "Warning...Warning..."
If Range("U426").Value < 2 Then MsgBox "Lexibase suspension is less than 2!!", 48,
"Warning...Warning..."
If Range("U428").Value < 3 Then MsgBox "Lidocaine + Epinephrine amp is less than 3!!", 48,
"Warning...Warning..."
If Range("U429").Value < 3 Then MsgBox "Lidocaine 50 ml is less than 3!!", 48, "Warning...Warning..."
If Range("U430").Value < 2 Then MsgBox "Lilac syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U437").Value < 3 Then MsgBox "Magnesium sulfate vial is less than 3!!", 48,
"Warning...Warning..."
If Range("U438").Value < 10 Then MsgBox "Maheseco kit is less than 10!!", 48, "Warning...Warning..."
If Range("U439").Value < 5 Then MsgBox "Mannitol is less than 5!!", 48, "Warning...Warning..."
If Range("U441").Value < 3 Then MsgBox "Medicine glass is less than 3!!", 48, "Warning...Warning..."
If Range("U450").Value < 2 Then MsgBox "Melmag syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U455").Value < 15 Then MsgBox "Methergin amp is less than 15!!", 48, "Warning...Warning..."
If Range("U460").Value < 2 Then MsgBox "Metoclopramide syrup is less than 2!!", 48,
"Warning...Warning..."
If Range("U461").Value < 10 Then MsgBox "Metoclopramide amp is less than 10!!", 48,
"Warning...Warning..."
If Range("U464").Value < 2 Then MsgBox "Metronidazole suspension is less than 2!!", 48,
"Warning...Warning..."
If Range("U466").Value < 3 Then MsgBox "Metronidazole vial is less than 3!!", 48, "Warning...Warning..."
If Range("U482").Value < 3 Then MsgBox "Moriamin forte is less than 3!!", 48, "Warning...Warning..."
If Range("U483").Value < 5 Then MsgBox "Morphine sulfate amp is less than 5!!", 48,
"Warning...Warning..."
If Range("U484").Value < 5 Then MsgBox "Mosegor vita capsule is less than 5!!", 48,
"Warning...Warning..."
If Range("U491").Value < 2 Then MsgBox "Multigen drops is less than 2!!", 48, "Warning...Warning..."
If Range("U492").Value < 2 Then MsgBox "Mupirocin ointment is less than 2!!", 48,
"Warning...Warning..."
If Range("U493").Value < 20 Then MsgBox "Myonal 50 mg tab is less than 20!!", 48,
"Warning...Warning..."
If Range("U494").Value < 30 Then MsgBox "Nafarin-A tab is less than 30!!", 48, "Warning...Warning..."
If Range("U497").Value < 2 Then MsgBox "Nasatapp drops is less than 2!!", 48, "Warning...Warning..."
If Range("U498").Value < 2 Then MsgBox "Nasatapp syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U503").Value < 2 Then MsgBox "Natravox 250mg/5ml suspension is less than 2!!", 48,
"Warning...Warning..."
If Range("U504").Value < 2 Then MsgBox "Natravox 457mg/5ml suspension is less than 2!!", 48,
"Warning...Warning..."
If Range("U505").Value < 10 Then MsgBox "Neb kit is less than 10!!", 48, "Warning...Warning..."
If Range("U511").Value < 20 Then MsgBox "Neoform 500 mg tab is less than 20!!", 48,
"Warning...Warning..."
If Range("U514").Value < 20 Then MsgBox "Neuro-Bs is less than 20!!", 48, "Warning...Warning..."
If Range("U517").Value < 4 Then MsgBox "Nicardipine amp is less than 4!!", 48, "Warning...Warning..."
If Range("U526").Value < 30 Then MsgBox "Nubain amp is less than 30!!", 48, "Warning...Warning..."
If Range("U527").Value < 2 Then MsgBox "Nutrilin drops is less than 2!!", 48, "Warning...Warning..."
If Range("U528").Value < 2 Then MsgBox "Nutrilin syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U536").Value < 2 Then MsgBox "Nystatin drops is less than 2!!", 48, "Warning...Warning..."
If Range("U544").Value < 10 Then MsgBox "Omeprazole IV is less than 10!!", 48, "Warning...Warning..."
If Range("U564").Value < 2 Then MsgBox "Paracetamol drops is less than 2!!", 48, "Warning...Warning..."
If Range("U565").Value < 2 Then MsgBox "Paracetamol 125mg/5ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U566").Value < 2 Then MsgBox "Paracetamol 250mg/5ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U567").Value < 10 Then MsgBox "Paracetamol amp is less than 10!!", 48,
"Warning...Warning..."
If Range("U573").Value < 2 Then MsgBox "Penicillin G IV is less than 2!!", 48, "Warning...Warning..."
If Range("U574").Value < 2 Then MsgBox "Penrose drainage is less than 2!!", 48, "Warning...Warning..."
If Range("U575").Value < 2 Then MsgBox "Phytomenadione amp is less than 10!!", 48,
"Warning...Warning..."
If Range("U582").Value < 5 Then MsgBox "Piracetam amp is less than 5!!", 48, "Warning...Warning..."
If Range("U588").Value < 2 Then MsgBox "Ponser syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U589").Value < 5 Then MsgBox "Potassium chloride vial is less than 5!!", 48,
"Warning...Warning..."
If Range("U595").Value < 2 Then MsgBox "Pred 20 syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U596").Value < 2 Then MsgBox "Pred 10 syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U598").Value < 10 Then MsgBox "Pregnancy test pack is less than 10!!", 48,
"Warning...Warning..."
If Range("U600").Value < 2 Then MsgBox "Prime cast 5 inches is less than 2!!", 48,
"Warning...Warning..."
If Range("U601").Value < 2 Then MsgBox "Plaster of Paris 4 inches is less than 2!!", 48,
"Warning...Warning..."
If Range("U602").Value < 2 Then MsgBox "Plaster of Paris 6 inches is less than 2!!", 48,
"Warning...Warning..."
If Range("U603").Value < 2 Then MsgBox "Wadding sheet 4 inches is less than 2!!", 48,
"Warning...Warning..."
If Range("U604").Value < 2 Then MsgBox "Wadding sheet 6 inches is less than 2!!", 48,
"Warning...Warning..."
If Range("U605").Value < 2 Then MsgBox "PRO-IG sachet is less than 2!!", 48, "Warning...Warning..."
If Range("U608").Value < 10 Then MsgBox "Promethazine amp is less than 10!!", 48,
"Warning...Warning..."
If Range("U615").Value < 5 Then MsgBox "Provexime vial is less than 5!!", 48, "Warning...Warning..."
If Range("U618").Value < 2 Then MsgBox "Pulmoxcel bottle is less than 2!!", 48, "Warning...Warning..."
If Range("U623").Value < 10 Then MsgBox "Ranitidine amp is less than 10!!", 48, "Warning...Warning..."
If Range("U624").Value < 10 Then MsgBox "Razor blade is less than 10!!", 48, "Warning...Warning..."
If Range("U625").Value < 2 Then MsgBox "Relestal drops is less than 2!!", 48, "Warning...Warning..."
If Range("U626").Value < 2 Then MsgBox "Relestal syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U628").Value < 2 Then MsgBox "Restime drops is less than 2!!", 48, "Warning...Warning..."
If Range("U630").Value < 2 Then MsgBox "Risek vial is less than 2!!", 48, "Warning...Warning..."
If Range("U639").Value < 1 Then MsgBox "Salinase drops is less than 1!!", 48, "Warning...Warning..."
If Range("U643").Value < 2 Then MsgBox "Salbutamol syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U648").Value < 3 Then MsgBox "SANITEX is less than 3!!", 48, "Warning...Warning..."
If Range("U660").Value < 2 Then MsgBox "Silver sulfadiazine cream is less than 2!!", 48,
"Warning...Warning..."
If Range("U665").Value < 5 Then MsgBox "Sinupret tab is less than 5!!", 48, "Warning...Warning..."
If Range("U667").Value < 2 Then MsgBox "Sodium bicarbonate amp is less than 2!!", 48,
"Warning...Warning..."
If Range("U670").Value < 20 Then MsgBox "Solmux broncho capsule is less than 20!!", 48,
"Warning...Warning..."
If Range("U672").Value < 2 Then MsgBox "Solmux broncho syrup is less than 2!!", 48,
"Warning...Warning..."
If Range("U673").Value < 7 Then MsgBox "Soluset is less than 7!!", 48, "Warning...Warning..."
If Range("U674").Value < 5 Then MsgBox "Splint A/L is less than 5!!", 48, "Warning...Warning..."
If Range("U675").Value < 5 Then MsgBox "Splint A/M is less than 5!!", 48, "Warning...Warning..."
If Range("U676").Value < 5 Then MsgBox "Splint A/S is less than 5!!", 48, "Warning...Warning..."
If Range("U677").Value < 5 Then MsgBox "Splint P/L is less than 5!!", 48, "Warning...Warning..."
If Range("U678").Value < 5 Then MsgBox "Splint P/M is less than 5!!", 48, "Warning...Warning..."
If Range("U679").Value < 5 Then MsgBox "Splint P/S is less than 5!!", 48, "Warning...Warning..."
If Range("U680").Value < 20 Then MsgBox "Sterile gauze 4x4 is less than 20!!", 48,
"Warning...Warning..."
If Range("U681").Value < 10 Then MsgBox "Sterile gloves 6.0 is less than 10!!", 48,
"Warning...Warning..."
If Range("U682").Value < 10 Then MsgBox "Sterile gloves 6.5 is less than 10!!", 48,
"Warning...Warning..."
If Range("U683").Value < 10 Then MsgBox "Sterile gloves 7.0 is less than 10!!", 48,
"Warning...Warning..."
If Range("U684").Value < 10 Then MsgBox "Sterile gloves 7.5 is less than 10!!", 48,
"Warning...Warning..."
If Range("U688").Value < 4 Then MsgBox "Suction cath fr.8 is less than 4!!", 48, "Warning...Warning..."
If Range("U689").Value < 4 Then MsgBox "Suction cath fr.14 is less than 4!!", 48, "Warning...Warning..."
If Range("U691").Value < 4 Then MsgBox "Suction cath fr.16 is less than 4!!", 48, "Warning...Warning..."
If Range("U690").Value < 1 Then MsgBox "Succinylcholine amp is less than 1!!", 48,
"Warning...Warning..."
If Range("U692").Value < 1 Then MsgBox "Suremine amp is less than 1!!", 48, "Warning...Warning..."
If Range("U695").Value < 0 Then MsgBox "Tegaderm pedia -no stock!!", 48, "Warning...Warning..."
If Range("U696").Value < 3 Then MsgBox "Tegaderm adult is less than 3!!", 48, "Warning...Warning..."
If Range("U697").Value < 2 Then MsgBox "Tempra 120 mg/5ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U698").Value < 2 Then MsgBox "Tempra drops is less than 2!!", 48, "Warning...Warning..."
If Range("U699").Value < 2 Then MsgBox "Tempra 250mg/5ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U707").Value < 1 Then MsgBox "Tobradex eye ointment is less than 1!!", 48,
"Warning...Warning..."
If Range("U709").Value < 2 Then MsgBox "Tobramycin + Dexamethasone eye ointment is less than 2!!",
48, "Warning...Warning..."
If Range("U710").Value < 2 Then MsgBox "Tobramycin eye drops is less than 2!!", 48,
"Warning...Warning..."
If Range("U711").Value < 30 Then MsgBox "Tongue dep is less than 30!!", 48, "Warning...Warning..."
If Range("U717").Value < 10 Then MsgBox "Tramadol amp is less than 10!!", 48, "Warning...Warning..."
If Range("U718").Value < 10 Then MsgBox "Tranexamic amp is less than 10!!", 48,
"Warning...Warning..."
If Range("U720").Value < 2 Then MsgBox "Trim-S 200mg/5ml is less than 2!!", 48, "Warning...Warning..."
If Range("U721").Value < 2 Then MsgBox "Trim-S forte 400mg/5ml is less than 2!!", 48,
"Warning...Warning..."
If Range("U722").Value < 30 Then MsgBox "Triplec capsule is less than 30!!", 48, "Warning...Warning..."
If Range("U723").Value < 2 Then MsgBox "Triplec syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U729").Value < 5 Then MsgBox "Urine bag is less than 5!!", 48, "Warning...Warning..."
If Range("U736").Value < 10 Then MsgBox "Ventolin nebule is less than 10!!", 48, "Warning...Warning..."
If Range("U737").Value < 2 Then MsgBox "Ventar 30 ml bottle is less than 2!!", 48,
"Warning...Warning..."
If Range("U741").Value < 2 Then MsgBox "Ventolin expectorant syrup is less than 2!!", 48,
"Warning...Warning..."
If Range("U742").Value < 1 Then MsgBox "Verapamil amp is less than 1!!", 48, "Warning...Warning..."
If Range("U743").Value < 5 Then MsgBox "Verorab is less than 5!!", 48, "Warning...Warning..."
If Range("U750").Value < 5 Then MsgBox "Vitamin B ampule is less than 5!!", 48, "Warning...Warning..."
If Range("U751").Value < 20 Then MsgBox "Wooden cotton applicator is less than 20!!", 48,
"Warning...Warning..."
If Range("U754").Value < 2 Then MsgBox "Zeditapp drops is less than 2!!", 48, "Warning...Warning..."
If Range("U759").Value < 2 Then MsgBox "Zinc vita drops is less than 2!!", 48, "Warning...Warning..."
If Range("U761").Value < 2 Then MsgBox "Zinc vita syrup is less than 2!!", 48, "Warning...Warning..."
If Range("U764").Value < 5 Then MsgBox "Zoltax 500mg is less than 5!!", 48, "Warning...Warning..."
If Range("U765").Value < 5 Then MsgBox "Zoltax vial is less than 5!!", 48, "Warning...Warning..."
If Range("U766").Value < 5 Then MsgBox "Zylohist tab is less than 5!!", 48, "Warning...Warning..."
If Range("U768").Value < 5 Then MsgBox "Zynapse 500 mg tab is less than 5!!", 48,
"Warning...Warning..."
If Range("U449").Value < 2 Then MsgBox "Melmag 60 ml is less than 2!!", 48, "Warning...Warning..."
End Sub