滚得太厉害了

X_ping

今天把一些汉字放到Excel中做个表格，原想便于翻查，
可因有的单元格要放较多的文字内容，导致单元格又高又宽，
当滚动鼠标查检时表格内容上下滚动太厉害了，
反而不方便了。
不知有无解决办法。

横槊赋诗

全选，然后ctrl+f查找

X_ping

横槊赋诗 发表于 2024-1-25 16:03
全选，然后ctrl+f查找

谢谢告知。
可不明白微软为什么非只设计成按单元格滚动，再来个按像素滚动的配置选项不是更好吗。

雷音山人

https://zhidao.baidu.com/question/1958057366144893668.html

excel如何让鼠标点哪里弹出窗口就显示哪里？
在Excel VBA中，可以使用以下代码让弹出窗体的位置跟着鼠标点击单元格位置显示：

上面的代码将在工作表中的每次选定更改时运行，并创建一个名为“frm”的 UserForm，然后设置其左上角的位置在目标单元格的右侧。你可以在 UserForm 的代码中编写显示内容的代码。

请注意，此代码仅在工作表上单击单个单元格时才会运行，而不适用于选择多个单元格或其他操作。
可以使用以下代码实现在鼠标点击单元格位置弹出窗体，并让窗体左上角与单元格右上角对齐：

需要在工作表所在的代码模块中添加上述代码，同时确保已经创建了名为"UserForm1"的窗体，并设置窗体的起始位置为左上角。
这样，当你点击任意单元格时，都会弹出窗体并让窗体左上角与单元格右上角对齐

X_ping

雷音山人 发表于 2024-1-25 16:11
https://zhidao.baidu.com/question/1958057366144893668.html

excel如何让鼠标点哪里弹出窗口就显示哪里 ...

感谢大驾援手。
这方法应当是神一级的应用了，一时怕学不会。

雷音山人

应该不复杂，

等高手坛友点评一下

豪斯DR

scrolling - Is there a way to scroll, by pixel, instead of by cell, in either Excel or OpenOffice Calc? - Super User

雷音山人

以下内容引用自楼上豪斯DR转发的网址

一种解决方法是 VBA 宏，它会在您离开行后自动将单元格的高度降低到默认值，例如 12.75 磅。如果选择单元格，则会将单元格高度设置为“自动调整”，从而显示单元格的全文。

代码：
Public LastCell As Object

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Selection.CountLarge = 1 Then
        'MsgBox "Cell " & Target.Address & " clicked."
        If Not LastCell Is Nothing Then
            If LastCell.Row <> ActiveCell.Row Then
                'MsgBox "Set Entire Row Height of " & LastCell.Address & " from " & LastCell.RowHeight & " to a smaller value"
                LastCell.EntireRow.RowHeight = 12.75
                Set LastCell = Nothing
            End If
        End If
        'MsgBox "Set Entire Row from " & ActiveCell.RowHeight & " to AutoFit"
        ActiveCell.EntireRow.AutoFit
        Set LastCell = ActiveCell
    End If
End Sub


如果您需要查看工作表的完整内容，可以通过在常规内容之后选择一列来添加一项功能，该功能为所有行设置。

X_ping

雷音山人 发表于 2024-1-26 11:26
以下内容引用自楼上豪斯DR转发的网址

一种解决方法是 VBA 宏，它会在您离开行后自动将单元格的高度降低到 ...

先生是excel的高手啊，承蒙一再施教，感激。
待我一试。

雷音山人

X兄客气了，只是转发，我也不懂，有同样需求

雷音山人

试了下前面转发的代码，没能运行，是不是缺少语句？
没时间研究学习了，同请高明指导