انا بحاول اجيب اخر رقم لسند القبض وا ازود +1 والكود مابيشتغل
مشكلتى مش عارف اكتب max مع داله index , match
Me.TextBox10 = Application.Index(Sheets("1").Range("g5:h65536"), Application.Match(Application.WorksheetFunction.Max((ComboBox2), Sheets("1").Range("g5:g65636"), 0), 2))
ارجوكم لا تبخلو عليا باهتمامكم
وجزاكم الله خير