VBA_ReportTools

Sub CombineAndCopyTextToA1() Dim selectedRange As Range Dim cell As Range Dim combinedText As String ' 检查是否有选定的单元格 If Selection.Cells.Count < 8 Then M
posted @ 2024-02-24 08:45  tianyunchuan  阅读(2)  评论(3)  编辑  收藏  举报