Nice way of teaching ...

@ProgramMaster338

26 күн бұрын

Sukriya 😊

Nice sir❤😊

@ProgramMaster338

26 күн бұрын

Thank you 😊

Series wise upload kijiye sir please Support hum karenge

@ProgramMaster338

24 күн бұрын

Meri Puri Kosis rahegi ki aap logo ko series wise video ....Keep supporting sir.

@jitendramahapatra1239

23 күн бұрын

@@ProgramMaster338 okay sir

Dear sir please help Please note that I have an excel workbook which has four sheets Jan, Feb, Mar, Apr, the data in these four sheets is different columns, how can I marge these 4 sheets in one singel sheet on different workbook threw vba pls help

@ProgramMaster338

24 күн бұрын

Sub CombineSheets() Dim ws As Worksheet Dim combinedSheet As Worksheet Dim lastRow As Long, combinedLastRow As Long Dim sheetName As String ' Add a new sheet to store combined data Set combinedSheet = ThisWorkbook.Sheets.Add(After:= _ ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)) combinedSheet.Name = "MergedData" ' Loop through each sheet in the workbook For Each ws In ThisWorkbook.Worksheets ' Skip the combined sheet itself If ws.Name combinedSheet.Name Then ' Get the last row of data in the combined sheet combinedLastRow = combinedSheet.Cells(Rows.Count, "A").End(xlUp).Row ' Get the sheet name sheetName = ws.Name ' Loop through each row of data in the current sheet For lastRow = 1 To ws.Cells(Rows.Count, "A").End(xlUp).Row ' Copy data to the combined sheet combinedSheet.Cells(combinedLastRow + lastRow - 1, 1).Value = sheetName ws.Rows(lastRow).Copy Destination:=combinedSheet.Rows(combinedLastRow + lastRow - 1) Next lastRow End If Next ws MsgBox "All sheets combined successfully!", vbInformation End Sub This code is generally used to combine your sheet in one sheet automatically with named merged cell. I hope you will get your questions answer .... We will discuss this topics in our upcoming class .. Keep supporting us.. Thank You