find vbscript excel specific cell

Excel의 특정 셀에서 find replace Vbscript 함수를 사용하고 싶습니다. 현재 코드 :find vbscript excel specific cell

Dim myxl 
Dim mywb 
Dim mysh 

Set myxl = CreateObject("Excel.Application") 
myxl.Visible = True 
myxl.DisplayAlerts = False 
myxl.EnableEvents = False 

'20160412 BM open the workbook 
Set mywb = myxl.Workbooks.Open(mysrcfile, True, False, , , , , , , True) 

'20160523 BM open the sheet 
Set mysh = mywb.WorkSheets("General") 

'The parameters in the following order for: what, replacement,lookat, searchorder, matchcase 
mywb.Sheets("General").Columns("C").Replace "Y", "N", 1, 2, True 

mywb.Save 
mywb.Close false 
Set mywb = Nothing 
myxl.EnableEvents = True 
myxl.DisplayAlerts = True 
myxl.Quit 
Set myxl = Nothing

이 코드에서 나는 스크립트가 전체 열 "C"를 볼 수 있도록 관리했습니다. 이제 특정 세포에서만 찾을 수있는 & 대체품을 찾고 싶습니다. 예를 들어 셀 C1, C2, C4, C11 및 일부만을 포함 할 수 있습니다. 누군가 이걸 내게 빌려 줄 수 있니?

p.s. 나는 VBA를 처음 사용하고 스크립팅/프로그래밍에 익숙하지 않다.

출처

2016-06-24 J.Doe

이렇게해야한다. 당신은 음절의 중복 방지 할 수있는 기능을 쓸 수 있습니다 :

mywb.Sheets("General").Range("C1").Replace "Y", "N", 1, 2, True 
mywb.Sheets("General").Range("C2").Replace "Y", "N", 1, 2, True 
mywb.Sheets("General").Range("C4").Replace "Y", "N", 1, 2, True 
mywb.Sheets("General").Range("C11").Replace "Y", "N", 1, 2, True

출처

2016-06-24 13:38:57 Vityata

를 그리고이 같은 시도하는 경우 :.. mywb.Sheets는 ("일반") 범위 ("C1") "Y", "N"을 교체 – Vityata

당신의 대답은해야 그것을해라. .. 그러나 그것은 아직도 일하고 있지 않다 : /. 함수로해볼 수 있습니까? –

안녕하세요. 정확히 작동하지 않는 것은 무엇입니까? > Range ("C1")를 쓰면, Y, N, 1, 2, True를 즉시 창에 Y로 바꾸지 않습니까? – Vityata

답변

관련 문제