[已解决]关于wps的问题

wp231957

再wps的文本框里，如何引用单元格内容，excel没问题，wps不知道咋弄

最佳答案

月排行榜 / 总排行榜

FishC

2024-3-7 15:09:19

嗨！在WPS的文本框中引用单元格的内容有一些不同的方法，我给你介绍两种常用的方式。

第一种方式是使用宏来实现。首先，在WPS的文本框中输入一个占位符，例如"{}"，然后按下"ALT+F11"打开宏编辑器。在宏编辑器中，选择“插入” - “模块”，在新建的模块中编写以下VBA代码：

Sub ReplacePlaceholder()
    Dim rng As Range
    Set rng = Sheets("Sheet1").Range("A1") ' 这里的Sheet1是你的工作表名称，A1是你要引用的单元格
    ActiveSheet.Shapes(1).TextFrame.Characters.Text = Replace(ActiveSheet.Shapes(1).TextFrame.Characters.Text, "{}", rng.Value)
End Sub

然后按下"CTRL+S"保存宏，在WPS中按下"ALT+F8"打开宏对话框，选择刚才保存的宏并点击"运行"按钮。这样，文本框中的占位符"{}"就会被你指定单元格的内容替换。

第二种方式是使用公式。在WPS的文本框中输入一个等于号"="，然后输入你要引用的单元格地址，例如"=Sheet1!A1"（其中"Sheet1"是你的工作表名称，"A1"是你要引用的单元格地址）。按下"Enter"键，就会把该单元格的内容显示在文本框中。

希望这个回答能对你有所帮助！如果还有其他问题，欢迎继续提问。

以上回复来自 FishC AI 小助理，如未能正确解答您的问题，请继续追问。

跳转到最佳答案楼层

FishC

嗨！在WPS的文本框中引用单元格的内容有一些不同的方法，我给你介绍两种常用的方式。

第一种方式是使用宏来实现。首先，在WPS的文本框中输入一个占位符，例如"{}"，然后按下"ALT+F11"打开宏编辑器。在宏编辑器中，选择“插入” - “模块”，在新建的模块中编写以下VBA代码：

Sub ReplacePlaceholder()
    Dim rng As Range
    Set rng = Sheets("Sheet1").Range("A1") ' 这里的Sheet1是你的工作表名称，A1是你要引用的单元格
    ActiveSheet.Shapes(1).TextFrame.Characters.Text = Replace(ActiveSheet.Shapes(1).TextFrame.Characters.Text, "{}", rng.Value)
End Sub

然后按下"CTRL+S"保存宏，在WPS中按下"ALT+F8"打开宏对话框，选择刚才保存的宏并点击"运行"按钮。这样，文本框中的占位符"{}"就会被你指定单元格的内容替换。

第二种方式是使用公式。在WPS的文本框中输入一个等于号"="，然后输入你要引用的单元格地址，例如"=Sheet1!A1"（其中"Sheet1"是你的工作表名称，"A1"是你要引用的单元格地址）。按下"Enter"键，就会把该单元格的内容显示在文本框中。

希望这个回答能对你有所帮助！如果还有其他问题，欢迎继续提问。

以上回复来自 FishC AI 小助理，如未能正确解答您的问题，请继续追问。

wp231957

FishC 发表于 2024-3-7 15:09
嗨！在WPS的文本框中引用单元格的内容有一些不同的方法，我给你介绍两种常用的方式。

第一种方式是使用 ...

如何再excel里对公式结果进行文本化，
比如 =now（）  结果是20240307
然后明天打开这个表  结果仍然是20240307

FishC

wp231957 发表于 2024-03-07 15:20
如何再excel里对公式结果进行文本化，
比如 =now（） ...

要在Excel中对公式结果进行文本化，您可以使用Excel的"值"功能或者使用VBA宏来实现。下面我将分别介绍这两种方法。

方法一：使用Excel的"值"功能
1. 在一个单元格中输入公式 "=NOW()" 来获取当前时间。
2. 选中该单元格，然后按下 "Ctrl + C" 复制该单元格。
3. 在需要文本化的单元格上，右键点击并选择 "值" 粘贴选项中的 "值"。
4. 这样，公式的结果将作为纯文本出现在目标单元格中，即使重新打开表格，日期不会被更新。

方法二：使用VBA宏
1. 按下 "Alt + F11" 打开 VBA 编辑器。
2. 在左侧的项目资源管理器窗口中，双击打开您的工作簿。
3. 在模块窗口中，插入以下 VBA 代码：

Sub TextifyFormulaResult()
    Dim rng As Range
    For Each rng In Selection
        rng.Value = rng.Value
    Next rng
End Sub

4. 关闭 VBA 编辑器。
5. 在需要文本化的单元格上，选中公式结果（例如 "=NOW()"），然后按下 "Ctrl + Shift + F8" 来选择宏 "TextifyFormulaResult"。
6. 执行完毕后，公式的结果将以纯文本形式显示在目标单元格中，即使重新打开表格，日期不会被更新。

这两种方法都可以实现在Excel中对公式结果进行文本化。希望这可以帮助到您！如有其他问题，请随时提问。

以上回复来自 FishC AI 小助理，如未能正确解答您的问题，请继续追问。