xlcenter

Hello.... I'm trying to figure how to merge two variable cells. Below is part of my code. What I'm trying to do is merge the cell in Column C and the cell in Column D. Appreciate any assistance provided. Thanks LastRow = Cells(Rows.Count, "A").End(xlUp).Row + 2 ActiveSheet.Cells(LastRow...

I'm trying to vlookup values in 3 worksheets in workbook wbPI against a table in second workbook wbPA. I am then replacing the #N/As and applying formatting to the positive look up results. Can anyone see why the code isn't working after the second vlookup please? Sub LookUp_View() Dim...

Can anyone offer a fix please for a VLOOKUP problem I am struggling to resolve? :confused: I am using a look-up table in "Book 2" to add the text value "YES" to columns on three different Sheets in "Book 1". I am then replacing the "#N/A" with "". Then using: .SpecialCells(xlCellTypeConstants...

Hello All For Each sht In ActiveWorkbook.Worksheets If sht.Visible And (sht.Name = "Alignment") Then sht.Delete Sheets.Add.Name = "Alignment" sht.Activate Cells.Select With Selection .Clear .RowHeight = 20.01 .ColumnWidth = 8.43...

Hi, I'm trying to have my sheet look at data in column A, find duplicates, and merge cells in column U,V, and W based on the number of rows with matching data. So if A5:A9 match, then U5:U9 merge, V5:V9 merge, and W5:W9 merge. I can get it to work for one row but I'm missing a step somewhere...

Hi simple ? need to center first row from A1 to G1 .Columns("A1:G1").HorizontalAlignment = xlCenter don't work .Columns("A:G").HorizontalAlignment = xlCenter works but centers everything from A to G Thanks

Hello, I was wondering if it is possible to detect a merged cell or range on one sheet(Sheet1) and merge the same cells in another sheet(Sheet2)? The columns being copied over go from B to H in a loop I am copying them row by row until LastRow. Not every cell in each B H range...

How do I make this all in 12 lines? I don't think it is possible without adding the with selections Range("A1").Select With Selection.Font .Size = 36 End With With Selection .HorizontalAlignment = xlCenter .VerticalAlignment = xlCenter End With With...