VBA-将选定的单元格范围（按用户）另存为pdf

Question

我是VBA的初学者，需要有关此代码的帮助。我将其放在工作表命令按钮上，并将其与宏连接（代码在此处）“ PrintSelectionToPDF”，它可以顺利通过代码，直到我按下按钮“取消”为止（如果改变主意并且不想将所选范围另存为PDF）在输入框中，它向我发送错误消息->运行时错误“ 424”，需要拒绝[在此处输入图片描述] [1] ->这部分代码->
 function ticked() { personCircles.selectAll('rect, image') .attr("x", function(d) { return d.x; }) .attr("y", function(d) { return d.y; }); }

如果能找到我的解决方案，请先谢谢您。

Set ThisRng = Application.InputBox("Select a range", "Get Range", Type:=8)