HTML files management with vba
'these were for updating more than 300 html files just with one code 'their objective was to make html content uniform Private Sub cmdopnnotepad_Click() Dim dTaskID As Double, path As String, file As String path = "C:\WINDOWS\notepad.exe" Dim filevalname As String Dim filenumopn As String For xtc = 1 To 1 simxtc = xtc + 1 filenumopn = "00" & simxtc & ".html" filevalname = "C:\models\" & filenumopn Me!txtfilename.Value = filenumopn file = filevalname dTaskID = Shell(path + " " + file, vbNormalFocus) 'MsgBox ("Text loaded") textsd As Document textsd = file '****************replace************************ 'REPLACE ALL kodu asagida : txtFind = "sokolag" txtReplace = "yarrakkurek" SandR '---------------------CODE 'Private Sub makenormallistIPlist() tx...