Giải trí với Excel (1 người xem)

[anhtuan1066]

Em tìm thấy cái này trên trang Web của MS.
.

Nói ko bằng chứng, bạn hãy đưa lên đây 1 file có sheet History thì mọi người mới tin

Còn cái vụ năm nhuận vẫn chưa nghĩ ra.

Như ở trên, bạn đã tìm thông tin trên Google, vậy vụ này cũng tìm thế đi... Tin chắc bạn cũng sẽ phát hiện đây là 1 sai sót của MS từ những ngày đầu xây dựng Office

 

[ptlong04x1]

Nói ko bằng chứng, bạn hãy đưa lên đây 1 file có sheet History thì mọi người mới tin.

Em chụp ảnh thế rồi chứ gì nữa.
File thì em có đây nhưng để hiện sheet History thì phải làm lại các bước như trên mới được.

 

[anhtuan1066]

Em chụp ảnh thế rồi chứ gì nữa.
File thì em có đây nhưng để hiện sheet History thì phải làm lại các bước như trên mới được.

Tôi xin trình bày các bước cho hiện sheet History đây:
----------------------------------------------------
- Mở 1 file mới, vào menu Tools\Track changes\Highlight change
- Check vào muc "Track changes while editing.... " và bỏ các tùy chọn "When", "Who", "Where" rồi OK
- Hộp Save As xuất hiện, cứ lưu file bình thường
- Hãy nhập liệu gì đó vào cell (để chứng tỏ rằng có thay đổi trên sheet)
- Vào menu Tools\Track changes\Accept or Reject changes, OK... Vẩn bỏ 3 tùy chọn "When", "Who", "Where" rồi OK... Tiếp theo bấm Accept All
- Vào lại menu Tools\Track changes\Highlight change lần nữa, (vẩn bỏ 3 tùy chọn "When", "Who", "Where") và check vào mục "List changes on a new sheet" rồi OK
Nếu thuận lợi, bạn sẽ thấy sheet History xuất hiện
----------------------------------------------------
Chúc thành công!
Còn đây là File thí nghiệm, sẽ cho phép xuất hiện sheet History,
Bạn mở file, gõ gì đó vào sẽ thấy
(cái này dùng VBA, chỉ để tham khảo, đưa lên chuyên mục về công thức thấy ko đúng lắm)

 

[anhtuan1066]

Tiếp theo chuyên mục này bằng 1 tình huống khác:
- Giả sử sheet hiện hành là Sheet1
- Tôi gõ 1 công thức =A1
- Tại cell khác, tôi gõ công thức =Sheet1!A1
Đương nhiên kết quả là như nhau... Tuy nhiên đôi lúc chúng có "phản ứng khác nhau trong 1 số tình huống cụ thể đấy
Ta cùng thí nghiệm nhé:
- Gõ số 1, 2, 3 lần lượt vào A1, A2, A3
- Cell B1 gõ công thức =A1, kéo fill công thức đến B3
- Cell C1 gõ công thức =Sheet1!A1, kéo fill công thức đến C3
- Quét chọn A1:C3, vào menu Data\Sort, chọn sort giảm dần theo cột A
===> Hảy xem "phản ứng" ở 2 cột B và C

 

[ptlong04x1]

Em thấy vẫn bình thường mà anh, bây giờ số 1 nằm tại ô A3 --> Sheet1!A3 = 1.

 

[anhtuan1066]

Em thấy vẫn bình thường mà anh, bây giờ số 1 nằm tại ô A3 --> Sheet1!A3 = 1.

Cột B và C công thức gần như nhau, thế mà khi Sort thì nó lại "phản ứng khác.
Vậy mà bạn lại cho là bình thường uh?
B1 vẫn có công thức = A1
Còn C1 thì sao? Sao khi sort xong, nó trở thành công thức =Sheet1!A3 rồi
Bạn không để ý sự khác nhau giửa cột B và C uh?
Nếu BÌNH THƯỜNG thì khi cột B thế nào, cột C phải thế nấy
Trường hợp này tôi cho là BẤT BÌNH THƯỜNG thì đúng hơn

 

[ptlong04x1]

Các ô cột B có giá trị bằng giá tri bằng giá trị ô bên cạnh của cột A --> B1=A1.
Nhưng còn Sheet1!A1... cũng không biết nói sao, nhưng mà em nghĩ nó như là 1 kiểu tham chiếu tuyệt đối nên nó không chịu chạy theo Sort --> Bó tay!

 

[anhtuan1066]

Hãy cùng tôi làm 1 cuộc thí nghiệm như sau:
- Gõ lần lượt các số từ 1 đến 500 vào các cell từ A1 đến A500
- Copy dử liệu cột A, paste vào các cột B, C, D, E và F
- Chọn toàn bộ dử liệu cột A, vào menu Format\Cells... Mục Custom các bạn gõ vào chử e
- Chọn toàn bộ dử liệu cột B, vào menu Format\Cells... Mục Custom các bạn gõ vào chử bb
- Chọn toàn bộ dử liệu cột C, vào menu Format\Cells... Mục Custom các bạn gõ vào chử B2d
- Chọn toàn bộ dử liệu cột D, vào menu Format\Cells... Mục Custom các bạn gõ vào chử B2e
- Chọn toàn bộ dử liệu cột E, vào menu Format\Cells... Mục Custom các bạn gõ vào chử B2dmmm
- Chọn toàn bộ dử liệu cột F, vào menu Format\Cells... Mục Custom các bạn gõ vào chử B2emmm
Xem lại dử liệu sau khi Format, chúng có kỳ lạ không?
--------------------------------------------------
Tiếp theo:
- Hãy chọn đại 1 cột dử liệu nào đó, vào Custom Format và gõ vào chử gpe xem nó ra cái gì
- Hãy chọn đại 1 cột dử liệu nào đó, vào Custom Format và gõ vào chử excel xem nó ra cái gì
- Hãy chọn đại 1 cột dử liệu nào đó, vào Custom Format và gõ vào chử bill gates xem nó ra cái gì
--------------------------------------------------
Ha... ha... Thú vị chứ?

 

[anhtuan1066]

Tôi sưu tầm file này khá hay (phải nói là công phu thì đúng hơn)
Các bạn hãy mở file đính kèm dưới đây rồi làm như sau:
1> Bấm Ctrl + A để chọn toàn bộ bảng tính
2> Vào menu Format\Row\Height và gõ vào số 15.33
3> Vào menu Format\Column\Width và gõ vào số 2.4
Format xong, các bạn nhìn thấy điều gì?

 

[anhtuan1066]

Tiếp chiêu:
Giả sử bạn gõ vào cell A1 công thức như sau:
="2-1"+"2-1"
Theo bạn, kết quả sẽ = bao nhiêu?
???
Nếu ai không cần thử nghiệm trực tiếp trên Excel mà có thể trả lời ngay kết quả thì thật là... TUYỆT VỜI!

 

[Ba Tê]

Chỉ có trường hợp A1= TRUE; A2='FALSE mới gạt được Excel nhw thế. Chắc không thể khác được.

 

[ptlong04x1]

Tôi sưu tầm file này khá hay (phải nói là công phu thì đúng hơn)
Các bạn hãy mở file đính kèm dưới đây rồi làm như sau:
1> Bấm Ctrl + A để chọn toàn bộ bảng tính
2> Vào menu Format\Row\Height và gõ vào số 15.33
3> Vào menu Format\Column\Width và gõ vào số 2.4
Format xong, các bạn nhìn thấy điều gì?

Ôi trời, cái này độc đáo quá!

 

[anhtuan1066]

Ôi trời, cái này độc đáo quá!

Tôi mở chủ đề này để mỗi khi chúng ta làm việc với Excel sẽ cảm thấy rằng:
- Excel ko chỉ là những con số khô khan mà còn chứa đựng rất nhiều bí ẩn lý thú
- Để bất chợt chúng ta phải thốt lên tiếng Oh... đầy kinh ngạc
- Khám phá... để chúng ta yêu thích Excel hơn mỗi ngày
Với tôi, Excel như là 1 trò chơi thú vị
(các bạn ai phát hiện ra điều gì với Excel, hãy gữi lên nhé)

 

[anhtuan1066]

Hãy cùng nhau khám phá file này nhé

 

[anhtuan1066]

Hãy chú ý hình này:

Để ý thấy cell A1 có chứa Text "Nguyễn Anh Tuấn" (nhìn trên thanh Formula) nhưng tại sao nhìn trực tiếp vào cell A1 thì nó lại biến đi đâu mất?
Để cụ thể hơn, các bạn hãy tự khám phá trong file đính kèm này nhé
Hãy nói cho mọi người biết nguyên nhân của vấn đề

 

[OverAC]

Hãy chú ý hình này:

Để ý thấy cell A1 có chứa Text "Nguyễn Anh Tuấn" (nhìn trên thanh Formula) nhưng tại sao nhìn trực tiếp vào cell A1 thì nó lại biến đi đâu mất?
Để cụ thể hơn, các bạn hãy tự khám phá trong file đính kèm này nhé
Hãy nói cho mọi người biết nguyên nhân của vấn đề

Khám phá ra chữ "Nguyễn Anh Tuấn" nằm bên dưới ô giống như bị bấm Ctrl + Enter nhưng lại không phải Ctrl + Enter.
Tóm lại là không hiểu.


Nếu mở file này ra sau file hehe thì sẽ bị ảnh hưởng bởi file he he. Mà file He he cũng không biết làm sao ra he he được

 

[anhtuan1066]

Khám phá ra chữ "Nguyễn Anh Tuấn" nằm bên dưới ô giống như bị bấm Ctrl + Enter nhưng lại không phải Ctrl + Enter.
Tóm lại là không hiểu.


Nếu mở file này ra sau file hehe thì sẽ bị ảnh hưởng bởi file he he. Mà file He he cũng không biết làm sao ra he he được

Nói ra xong nhiều khi thấy nó đơn giản đến ko ngờ:
1> Cái He... he... ấy có nguồn gốc từ 1 ComboBox

a) Unprotect sheet (ko có pass)
b) Mở chế độ Design Mode
c) Ctrl + G\Special\Objects để tìm thằng ComboBox này
d) Properties ComboBox này sẽ thấy LinkedCell = Link và ListFillRange = P1
​

Vậy hãy xem P1 chứa công thức gì và name Link là gì!
Vào Insert\Name\Define thì chẳng thấy name Link... Tuy nhiên bằng cách nào đó bạn Unhide dc name này thì sẽ hiểu!
---------------------------------
2> Ta có thể thí nghiệm:

a) Gõ chử Nguyễn Anh Tuấn vào 2 cell A1 và A2
b) Format cell B1 với Font size = 72
c) Chỉnh lại Row Height cho 2 dòng 1 và 2 = 12.75 (theo mặc định)
​

Sau thí nghiệm sẽ thấy Text trong cell A1 biến mất... vì nó phụ thuộc vào Font size tại B1
Ha... ha... Đơn giản lắm chứ!

 

[anhtuan1066]

Sum Intersect

Các bạn hãy nghiên cứu code này:

Function SumIntersect(Rng1 As Range, Rng2 As Range) As Double
  Dim Rng As Range
  On Error Resume Next
  Set Rng = Intersect(Rng1, Rng2)
  SumIntersect = WorksheetFunction.Sum(Rng)
End Function

Cú pháp hàm:
=SumIntersect(Vùng 1, Vùng 2)
Đây là SUM của tất các các cell nằm trong vùng GIAO giữa Vùng 1 và Vùng 2
Dùng code VBA viết cho yêu cầu này rất dể dàng, đúng không?
Vậy xin hỏi các bạn, trong các hàm Excel, có hàm nào có khả năng làm được điều tương tự như UDF này không?

 

[BNTT]

Các bạn hãy nghiên cứu code này:

Function SumIntersect(Rng1 As Range, Rng2 As Range) As Double
  Dim Rng As Range
  On Error Resume Next
  Set Rng = Intersect(Rng1, Rng2)
  SumIntersect = WorksheetFunction.Sum(Rng)
End Function

Cú pháp hàm:
=SumIntersect(Vùng 1, Vùng 2)
Đây là SUM của tất các các cell nằm trong vùng GIAO giữa Vùng 1 và Vùng 2
Dùng code VBA viết cho yêu cầu này rất dể dàng, đúng không?
Vậy xin hỏi các bạn, trong các hàm Excel, có hàm nào có khả năng làm được điều tương tự như UDF này không?

Dạ thưa có! Hàm SUM.
Muốn tính tổng vùng giao nhau giữa A1:B10 và B8:C12, gõ công thức như thế này:

=SUM(A1:B10 B8:C12)​

Giữa A1:B10 và B8:C12 là một khoảng trắng, chứ không phải là một dấu phân cách.

Tuy nhiên, nó chỉ ra kết quả khi 2 vùng giao nhau thật sự, chứ nếu dùng kiểu đó cho 2 vùng không giao nhau (A1:B10 và D7:F14 chẳng hạn) thì Excel sẽ báo lỗi #NULL!, nghĩa là nó chả biết tính toán cái gì cả.

 

[anhtuan1066]

Dạ thưa có! Hàm SUM.
Muốn tính tổng vùng giao nhau giữa A1:B10 và B8:C12, gõ công thức như thế này:

=SUM(A1:B10 B8:C12)
​

Giữa A1:B10 và B8:C12 là một khoảng trắng, chứ không phải là một dấu phân cách.

Tuy nhiên, nó chỉ ra kết quả khi 2 vùng giao nhau thật sự, chứ nếu dùng kiểu đó cho 2 vùng không giao nhau (A1:B10 và D7:F14 chẳng hạn) thì Excel sẽ báo lỗi #NULL!, nghĩa là nó chả biết tính toán cái gì cả.

Chính xác 100%, nó là khoảng trắng giữa 2 vùng
Union(Rng1, Rng2) tương đương với Rng1, Rng 2 (dấu phẩy ngăn cách giữa Rng1 và Rng2)
Intersect(Rng1, Rng2) tương đương với Rng1 Rng2 (khoảng trắng ngăn cách giữa Rng1 và Rng2)