Đăng ký học Excel - PivotTable 3 buổi tối (31/7, 2 và 4/8) - TPHCM

định dạng fonts chữ + get.cell(18,"cell")

Thảo luận trong 'Cấu trúc dữ liệu Excel và việc Xử lý dữ liệu' bắt đầu bởi mrhackgm, 17 Tháng bảy 2017.

  1. mrhackgm

    mrhackgm Thành viên chính thức

    Em muốn excel thông báo cell nào có fonts không phải Unicode
    trong file nhiều fonts
    1/. Unicode, VD: times new roman
    2/. Fonts ABC, VD: ".Vntime"
    hiện tại em đang làm theo cách:

    B1: dùng get.cell(18,cell) Crtl + F3: getinf= get.cell(18,Sheet1!A1)
    B2: Dùng left(getinf) lọc ra ký tự "." đem vào logic trong CF =LEFT(getinf,1)="."
    b3: => lọc ra màu CF, => convert fonts

    nhưng vùng dữ liệu bé tý teo thì đc, cơ mà phập phù,
    máy báo lỗi không đủ tài nguyên :(
    có cách làm nào khác không các bác?

    em hay phải đi cóp nhặt dữ liệu, làm CSDL để phân tích trong SPSS hoặc Stata,
    mà ngã ngựa ở ngay quả fonts :(
    em xin chân thành cảm ơn!
     

    Các file đính kèm:

  2. mrhackgm

    mrhackgm Thành viên chính thức

    vẫn fails các bác à. e chưa tìm được cách giải quyết
     
  3. mrhackgm

    mrhackgm Thành viên chính thức

    các bác ơi
    giờ giải quyết theo hướng dùng VBA
    gọi
    With Application.FindFormat.Font
    .Name = ".VnTime"

    khi tìm được rồi, có thể làm nhiều thứ
    ví dụ, mình goto cell đó: application.goto (ref.....)

    được không ạ?
     

Chia sẻ trang này