Пікірлер

• 
  @mirselimmiragayev78792 жыл бұрын

  Mene aidd

• 
  @turanabdullayev3693 жыл бұрын

  Videoda izah olunan Macros-Module hissəsinə aşağıda qeyd olunan kodu əlavə edin: Sub CopyFilteredCells() 'Updateby20150203 Dim rng1 As Range Dim rng2 As Range Dim InputRng As Range Dim OutRng As Range xTitleId = "KutoolsforExcel" Set InputRng = Application.Selection Set InputRng = Application.InputBox("Copy Range :", xTitleId, InputRng.Address, Type: = 8) Set OutRng = Application.InputBox("Paste Range:", xTitleId, Type: = 8) For Each rng1 In InputRng rng1.Copy For Each rng2 In OutRng If rng2.EntireRow.RowHeight > 0 Then rng2.PasteSpecial Set OutRng = rng2.Offset(1).Resize(OutRng.Rows.Count) Exit For End If Next Next Application.CutCopyMode = False End Sub

• 
  @humayismayilova1795 жыл бұрын

  Bravoo..

• 
  @gulnartacl64065 жыл бұрын

  .....

• 
  @museibmansurov30306 жыл бұрын

  Allah rehmet elesin. Cox gozel senetkar dahilerin dahisi. Bu sese, istetada malik olan ikinci bir adam tanimiram.