Find and Replace not capturing entire line

Steve Kunkel · #1 04-22-2021, 10:00 AM

Thanks for moving this to the correct forum. I was able to edit your above find and replace definitions to use the value from my text box. The below code works perfectly and I'm able to simply call my above posted function, which is nice.

Code:

Private Sub cmdLeftPad_Click()
    Call DoFindClean("([ A-Z]@[!^13^l]{1,})", (txtPadding.Value) & "\1", 0, 1)
    Call DoFindClean((txtPadding.Value) & "([ ]@<)", "\1" & (txtPadding.Value), 0, 1)
End Sub
Private Sub cmdRightPad_Click()
    Call DoFindClean("([ A-Z]@[!^13^l]{1,})", "\1" & (txtPadding.Value), 0, 1)
End Sub

Thread Tools
Show Printable Version Email this Page
Display Modes
Switch to Linear Mode Hybrid Mode Switch to Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Find and Replace Line Spacing	farisca	Word	2	06-18-2020 04:02 PM
Find / Replace hard Carriage Return with Line break.	GreenBoy	Word	2	03-11-2018 02:32 AM
Find/Replace in a selected cell(s), but across entire workbook	ue418	Excel	1	12-21-2017 12:32 AM
Bad view when using Find and Find & Replace - Word places found string on top line	paulkaye	Word	4	12-06-2011 11:05 PM
using find/replace on an entire directory?	mzimmers	Word	0	12-13-2010 12:05 PM