Replace word

		Microsoft Office Forums > Microsoft Excel > Excel Programming
Replace word

FAQ

Thread Tools

Display Modes

11-23-2019, 10:39 AM

BobBridges BobBridges is offline

Windows 7 64bit Replace word

Office 2010 32bit

Expert

Join Date: May 2013

Location: USA

Posts: 700

Here's part of it; I imagine you can adapt it to your own coding style and expand from German to Italian:

Code:

Set owb = ThisWorkbook
Set ows1 = owb.Worksheets(1)
Set ows2 = owb.Worksheets(2)
if ows2.Cells(2, 2).Value = "german" Then
  ows1.Cells(5, 1).Value = "apple"
  ows1.Cells(10, 3).Value = "fruit"
  End If

Not sure what you mean by "save range", and I never print so I'll have to leave you to figure out that part.

« Previous Thread | Next Thread »

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Need help to replace a word in word file (macro)	guwic	Word VBA	1	05-13-2019 12:23 AM
Word find and replace	ganesang	Word	4	11-27-2018 12:04 AM
In Find and Replace, can Word stop after each Replace?	wardw	Word	1	06-08-2017 02:47 PM
Need help using Find & Replace (MS Word)	BZee	Word	9	02-16-2015 05:45 PM
find&replace word in uppercase with word in lowercase	andrei	Word	3	10-03-2011 05:11 AM

Other Forums: Access Forums

All times are GMT -7. The time now is 08:02 PM.