Kết quả tìm kiếm

  1. A

    Thắc mắc code

    Subdien() Dim x As Double Dim y As Double x = Val(InputBox("nhap x = ")) y = Val(InputBox("nhap y = ")) If x > y Then For i = y + 1 To x - 1 Cells(i, 1) = i Next i End If If x < y Then For i = x + 1 To y - 1 Cells(i, 1) = i Next i End If Application.Columns(1).Select For Each...
  2. A

    Sửa lỗi code giúp mình

    Cho vùng bảng tính A1..G7 có chứa các số bất kỳ.tìm giá trị dương nhỏ nhất và tô màu đỏ vào ô chứa giá trị đó
  3. A

    Cho e hỏi bài này với

    Tạo các sheet mới có tên tương ứng với giá trị của các ô trong vùng A1...F1 của sheet 1.
Top