单元格的符号是 ${detalhes.origim.name()},在单元格中返回一个字符串,但字符串的名称始终是“TEST_TEST”,但我需要在此电子表格上重命名为“Teste beautiful form”之类的名称。此表示法只能返回 4 个不同的名称。有没有办法在Excel上使用switch case? ty。
我在 vba 上尝试了模块,但没有成功,我该如何重命名它? 我尝试的代码:
Dim score As String, result As String
score = Range("F5").Value
Select Case score
Case "CONTAS_PAGAR"
result = "Contas a pagar"
Case "CONTAS_RECEBER"
result = "Contas a receber"
Case "MOVIMENTO_BANCARIO"
result = "Movimento bancário"
Case "MOVIMENTO_CAIXA"
result = "Movimento de caixa"
Case Else
result = "Não encontrado"
End Select
Range("F6").Value = result
最佳答案
如果打包在 SUB() 中,您的代码就可以工作:
Sub vini()
Dim score As String, result As String
score = Range("F5").Value
Select Case score
Case "CONTAS_PAGAR"
result = "Contas a pagar"
Case "CONTAS_RECEBER"
result = "Contas a receber"
Case "MOVIMENTO_BANCARIO"
result = "Movimento bancário"
Case "MOVIMENTO_CAIXA"
result = "Movimento de caixa"
Case Else
result = "Não encontrado"
End Select
Range("F6").Value = result
End Sub
编辑#1:
作为函数:
Function vini(score As String) As String
Select Case score
Case "CONTAS_PAGAR"
result = "Contas a pagar"
Case "CONTAS_RECEBER"
result = "Contas a receber"
Case "MOVIMENTO_BANCARIO"
result = "Movimento bancário"
Case "MOVIMENTO_CAIXA"
result = "Movimento de caixa"
Case Else
result = "Não encontrado"
End Select
vini = result
End Function
关于java - 当从数据库检索的值不同时如何更改 Excel 单元格?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/44808356/