Not: son satır yada sütunu bulmak için usedrange kodunu kullanmanızı çok önermem, boş olsa bile biçim formatı varsa alıyor onun yerine ilgili satıra göre aşağıdaki kod kullanılabilir

sht.Cells(1, sht.Columns.Count).End(xlToLeft).Column

ama aklımda kaldığı kadarıyla sizin parametre sayfanız daha karışık