Good day Pros,
Please is it Posible to write a VBA code based on the below algorithms? iF SO PLEASE HELP..All my definition should be by column headers because column heading changes. Sample file is attached.
Thank you.
1. W/O CC/MCC
(Note, I want to be able to add multiple comments in parenthesis under comments heading e.g. (Comment = Comment + (new comment))Also note green colors are column headings..yellow colors are determinant factors.(Cell Values)
· Select W/O CC MCC from DRG Type W CC MCC
· Look for j44.9 and or J44.1 from DX1 to DX10 then look for (j96.21 and or j96.00 and or j96.01 and or j96.20) on same row. Is j96.21 or j96.00 present?. Yes do nothing, No, give red font for (Chronic obstructive pulmonary disease, unspecified) and then insert at the COMMENT (Check for Resp Failure).
· Look for A41.9 under DX1, then give red font for (Sepsis, unspecified organism) and then insert under COMMENT (Check to see if Septic Shock Documented)
· Look for K72.90 then make (Hepatic failure, unspecified without coma) a red font and insert comment (Query for Aquity of hepatic Encephalopathy)
· If DRG Type W CC MCC = W/O CC/MCC and I26.92 or I96.99 is present in DX1 to DX10, then insert comment (Check for Pulmonary Embolism with Cor Pulmonale)
· All cases with W/O CC/MCC where there is E86.0 and there is no N17.0, N17.1, N17.2, N17.8 or N17.9, then insert comment (Check for Renal failure) and give rent font to (Dehydration)
· For All cases with W/O CC/MCC where there is I10 and no I50.21, I50.22, I50.1, I50.23, I50.31, I50.32, I50.33, I50.41, I50.42, I50.43 Insert Comment (Check for heart failure) and then give red font to (Essential (primary) hypertension)
2. DRG
· For all DRG 004 insert comment (Check for Isthmus resection)
· For All DRG 003 insert OK
· For All DRG 282 where there is no I50.21, I50.22, I50.1, I50.23, I50.31, I50.32, I50.33, I50.41, I50.42, I50.43 Insert Comment (Check for heart failure or Acuity of HF) and then give red font to
ST elevation (STEMI) myocardial infarction involving left main coronary artery
ST elevation (STEMI) myocardial infarction involving left anterior descending coronary artery
ST elevation (STEMI) myocardial infarction involving other coronary artery of anterior wall
ST elevation (STEMI) myocardial infarction involving right coronary artery
ST elevation (STEMI) myocardial infarction involving other coronary artery of inferior wall
ST elevation (STEMI) myocardial infarction involving left circumflex coronary artery
ST elevation (STEMI) myocardial infarction involving other sites
ST elevation (STEMI) myocardial infarction of unspecified site
Non-ST elevation (NSTEMI) myocardial infarction
Subsequent ST elevation (STEMI) myocardial infarction of anterior wall
Subsequent ST elevation (STEMI) myocardial infarction of inferior wall
Subsequent non-ST elevation (NSTEMI) myocardial infarction
Subsequent ST elevation (STEMI) myocardial infarction of other sites
Subsequent ST elevation (STEMI) myocardial infarction of unspecified site
· For All DRG 870 insert comment (Check for Tracheostomy)
· For All DRG 871 insert comment (check for Missed Procedure)
· For All DRG 872 insert comment (Review for MCC or check documentation for Septic shock)
· For All DRG 440 insert comment (look for malnutrition) and give red font to (Acute pancreatitis, unspecified, Other acute pancreatitis or Alcohol induced acute pancreatitis, Biliary acute pancreatitis, Idiopathic acute pancreatitis)
3. W MCC
For All Cases W MCC where there is N39.0 and DRG does not contain 870, 871, or 872 then Insert comment (Check for Sepsis) and then give red font to (Urinary tract infection, site not specified).
Miscellaneous
· Any case with J18.9 and there is no A40.3, J12.81 J13. J14. J15.0 J15.1 J15.20 J15.211 J15.212 J15.29 J15.3 J15.4 J15.5 J15.6 J15.7 J15.8 J16.8 J17, A40.0 A40.1 A40.3 A40.9 A41.01 A41.02 A41.1 A41.2 A41.3 A41.4 A41.51 A41.52 A41.53 A41.81 A41.9 R65.20 R65.21
· In PX1 to PX4, when there is 5A1935Z or 5A1945Z. or 5A1955Z and DRG is not 208, or 207 then insert comment (look for respiratory condition to be made PDX, also look for Tracheostomy and calculate vent hours) then red font for 5A1935Z or 5A1945Z. or 5A1955Z.
· In PX1 to PX4 when there is 5A1935Z or 5A1945Z and LOS > 4.0 then insert comment (Please calculate Vent hours) and give red font to 5A1935Z or 5A1945Z.
1.