能不能在EXCEL表中做到只要把鼠标放到某一单元格上就能显示该单元格的全部内容？

abn223

这个问题是不是很难啊？希望帮助的朋友能不能从为什么那些数字格式的单元格不管有多大的数据内容，只要鼠标一放到那就能显示全部的数据。但文本的就不行，为什么？能不能从这方面着手想想办法，不知行不行？

请帮助，谢谢！

[ 本帖最后由 abn223 于 2011-1-26 22:22 编辑 ]

pax_of

仔细看看设置里面能不能实现，用VB应该是较好的方法，用手机登陆，只能帮楼主顶上去

kakaco

哇。高手。。

这个也忒难了吧。

pecker_cas

不用vba 应该做不到吧
用vba的话，可以生成批注，批注的内容就是单元格的内容

pax_of

这两天发现添加超链接也会提示，呵呵，不过就是楼主的效果……

yuanlinfj

我空间求助有 2011年到现在估计你都很难用上了

哒哒哒哒哒@

楼主找到方法没~

OEM

我的思路是，看看可不可以通过修改Normal文件实现

hsw212

这种智能用API做吧，转一下chris大神的作品

署名作者: chrisfang
版权声明: 版权归本站与作者共有 除本站官方外非作者本人转载须经许可并注明出处
本文来自:
引用作品:
适用版本: 2010 2007 2003以前版本
语言环境: 简体中文

RangeFromPoint函数可以获取某个坐标位置上的单元格或对象，如果配合API函数GetCursorPos，则可以获取鼠标所在位置的单元格或对象信息。此思路并非本人首创，Button和chijanzen等前辈都曾有过相关论述，在此仅对此方法进行进一步的整理总结和改进。

由于工作表和工作簿没有MouseMove事件，要想实时地获取鼠标移动后的位置信息，可以借用死循环或用计时器定时反复运行程序来扫描鼠标的移动事件，以牺牲系统资源为代价换取模拟的MouseMove事件。

图表对象具有Mouse事件，不需要借用死循环或计时器即可编写出可以根据鼠标位置获取图表内容信息的程序。

以下程序根据以上思路编写，点击开始按钮开启扫描状态后，鼠标所在位置的信息可以显示在A1、A2单元格中——如果鼠标所在位置为单元格，则A1、A2单元格分别显示鼠标所在单元格的行号和列号，如果鼠标所在位置为对象（如图形、图表、文本框、艺术字、控件等等），则在A1单元格中显示其名称。

Private Declare Function GetCursorPos Lib "user32" (lpPoint As MyPoint) As Long
Private Type MyPoint: X As Long: Y As Long: End Type
Public flag
Sub mousetarget()
    Dim CurPos As MyPoint
    Do While flag
    GetCursorPos CurPos
    x1 = CurPos.X: y1 = CurPos.Y
    Set CurRng = ActiveWindow.RangeFromPoint(x1, y1)
    If CurRng Is Nothing Then Exit Sub
    On Error Resume Next
    If TypeName(CurRng) = "Range" Then
        Range("A1") = CurRng.Row
        Range("A2") = CurRng.Column
    Else
        Range("A1") = CurRng.Name
        Range("A2") = ""
    End If
    DoEvents
    Loop
End Sub

Sub startscan()
    MsgBox "开始"
    flag = True
    mousetarget
End Sub
Sub endscan()
    MsgBox "结束"
    flag = False
End Sub

rocklive

hsw212 发表于 2019-5-28 16:25
这种智能用API做吧，转一下chris大神的作品

署名作者: chrisfang

太厉害了，正是我想要的效果，在网上找了好久终于找到了，
但有一下问题，点了开始之后如果鼠标移出了单元格范围，比如移到了菜单栏后，就个获取程就停止了，就算鼠标再移回到单元格范围也不会运行了，
能不能改为只要鼠标移到单元格范围就自动动开始呢？