수식의 텍스트 찾기 및 바꾸기

매크로 작성 방법을 이해하는 데 문제가 있습니다.수식의 텍스트 찾기 및 바꾸기

열을 검색하고 각 셀에서 "TODAY()" 텍스트를 확인한 다음 "TODAY() + B2"으로 바꿉니다. 여기서 B2는 일 수입니다.

나는 계속 찾고 있었고 나는 가깝다고 생각하지만 여전히 문제가있다.

Sub findrep() 
    Dim Findtext As String 
    Dim Replacetext As String 
    Findtext = "TODAY()" 
    Replacetext = SUM(TODAY(),"Sheets("Sheet1").Range("B2").Value") 
    Columns("A").Replace what:=Findtext, replacement:=Replacetext, lookat:=xlPart, MatchCase:=False 

End Sub

셀 B2의 날짜 수에 따라 미래의 언젠가 셀에 날짜를 표시하려고합니다. VBA는 수식에 단지 "TODAY()" 이상이 있으므로 셀의 수식을 검색 할 수 있어야합니다.

미리 감사드립니다.

출처

2014-01-28 Jazz

내가 가까이 알고

Replacetext = "TODAY()+Sheet1!B2"

출처

2014-01-28 11:42:52

이 줄

Replacetext = SUM(TODAY(),"Sheets("Sheet1").Range("B2").Value")

을 변경하려고합니다! 빠른 응답에 감사드립니다. 최대한 빨리 받아 들일 것입니다. – Jazz

수식의 텍스트 찾기 및 바꾸기

답변

관련 문제