咔片PPT · AI自动生成演示文稿,模板丰富、排版精美 讯飞智文 · 一键生成PPT和Word,高效应对学习与办公

自己腼腆,不善言辞。暗恋同事好久了,不知如何表达。

如果当面说,怕尴尬,也不像文科生口才好,说不出口。

如果写信,发微信,怕对方当面拒绝,要是被其他同事知道,还可能被笑话。

怎样向同事表达爱意呢?还不留痕迹那种?

今天教大家一招。用Excel的Workbook_Open事件。代码如下:

Private Sub Workbook_Open()

MsgBox "亲爱的娜扎,我爱你。今晚有空看电影吗?"

End Sub

只要对方一打开Excel, 就自动弹出示爱窗口。如果对方有意,就会主动回复你。如果无意,自己也不尴尬。

怎样把以上代码添加到自己的Excel里呢?很简单。

  1. ATL+F11 调出Visual Basic窗口。
  2. 双击ThisWorkbook.
  3. 在代码出口复制以上代码即可。