狗剩日记

狗剩日记

记录学习和生活

VBA比较两张相同结构表格差异并标红

可根据具体使用情况修改“Set compareRange = wsCurrent.Range("A5:AC17")”，括号内为比较范围Option Explicit Public Sub 比较两张表格差异() ' --- 变量声明 --- Dim wsCurrent As Worksheet Dim wsPrevious As Worksheet Dim compareRange As Range Dim cell As Range Dim previousSheetName As String Dim previousCellValue As Variant Dim differencesFound As Long Dim commentText As String Set wsCurrent = Application.ActiveSheet differencesFound

EXCEL及VBA · 15 天前

清单保持单元格底边对齐的研究

因为合并单元格的不同，导致需要多重判断，异常难做，BUG很多，仅作留档备份

EXCEL及VBA · 23 天前

excel选中表格英文符号全部替换为中文符号，同时将数字格式修改为Times New Roman

专为编办设计，一键将选中表格英文符号全部替换为中文符号，同时将数字格式修改为Times New Roman。

EXCEL及VBA · 06-23

此内容被密码保护

请输入密码访问

其他编程 · 06-20

EXCEL表格拆分工具源码（某列按关键词拆分）

该代码主要用于拆分清单中不同县部门的部分，后来优化了一下，使其可以适用于不同表格，也算比较实用，不同于方方格子的拆分是，方方格子的拆分适用于单元格内内容固定，该脚本逻辑是“只要包含某个关键词就拆分入其中”，并且会将未拆分过的单独列出，方便检查。import tkinter as tk from tkinterdnd2 import DND_FILES, TkinterDnD from tkinter import messagebox, ttk import openpyxl from openpyxl import Workbook, load_workbook from openpyxl.utils import column_index_from_string, get_column_letter from copy import copy import os import threading import concurrent.futures import time # 定义拆分列号识别的关键词 KEYWORDS = ["县级指导部门", "上级

python · 06-19