如何根据不同的表更改excel中的值

Question

我有一张excelsheet，其中包含两张分别命名为＆＃39; MidiFile＆＃39;和＆＃39; <section class="col-lg-12 col-md-12 col-sm-12 col-xs-12 text-center"> <p>Lorem ipsum sit dolor amet <a href="mailto:email@email.com" data-rel="external">email</a> consectetur adipiscing elit. Vestibulum faucibus est lobortis.</p> </section> ＆＃39;。在Sertifika我需要一个按钮，将单元格B6，M2和M3的值升级到Egitim Katılım的下一个单元格。

示例：

Sertifika

我希望将B6的值更改为

Egitim Katılım

怎么可能？

Answer 1

假设您已经知道如何使用按钮，请在命令按钮中包含以下代码，

Sub mac()
Dim str As String, a As String
str = Range("B6").Formula
a = Right(str, (Len(str) - InStr(str, "C")))
a = a + 1
Range("B6").Formula = "='E?itim kat?l?m'!C" & a
End Sub

代码提取单元格B6中的公式，从公式中取消行号，为其添加+1并更新公式。我希望你能为其他2个细胞操纵它。