Delete me , Or edit and use me

Hi there,

Delete this Thread, or edit it and use it as you choose

KJAGDJadkjaHGDakjhdKHGDWUDZUD

akjdKJADAKJHDKJDH





























new FT is a different but I found it here and it works

Code:

---

#If VBA7 Then
    #If USE_RGB Then
        Public Const TB_BORDER_COLOR As String = "rgb(182, 170, 166)"
        Public Const COLHDR_BCKGRND_COLOR As String = "rgb(0, 0, 0)"
        Public Const ROWHDR_FONT_COLOR As String = "rgb(32, 17, 22)"
        Public Const csHEADER_COLOR As String = "rgb(255, 255, 255)"
        Public Const csROW_BACK As String = "rgb(255, 255, 255)"
    #Else
        Public Const TB_BORDER_COLOR As String = "#B6AAA6"
        Public Const COLHDR_BCKGRND_COLOR As String = "#000000"
        Public Const ROWHDR_FONT_COLOR As String = "#201116"
        Public Const csHEADER_COLOR As String = "#FFFFFF"
        Public Const csROW_BACK As String = "#FFFFFF"
    #End If
    Public Const ROWHDR_BCKGRND_COLOR As String = COLHDR_BCKGRND_COLOR
    Public Const ROWHDR_BORDER_COLOR As String = TB_BORDER_COLOR
#Else
    #If USE_RGB Then
        Public Const TB_BORDER_COLOR As String = "rgb(182, 170, 166)"
        Public Const COLHDR_BCKGRND_COLOR As String = "rgb(0, 0, 0)"
        Public Const ROWHDR_FONT_COLOR As String = "rgb(32, 17, 22)"
        Public Const csHEADER_COLOR As String = "rgb(255, 255, 255)"
        Public Const csROW_BACK As String = "rgb(255, 255, 255)"
    #Else
        Public Const TB_BORDER_COLOR As String = "#B6AAA6"
        Public Const COLHDR_BCKGRND_COLOR As String = "#000000"
        Public Const ROWHDR_FONT_COLOR As String = "#201116"
        Public Const csHEADER_COLOR As String = "#FFFFFF"
        Public Const csROW_BACK As String = "#FFFFFF"
    #End If
    Public Const ROWHDR_BCKGRND_COLOR As String = COLHDR_BCKGRND_COLOR
    Public Const ROWHDR_BORDER_COLOR As String = TB_BORDER_COLOR
#End If


#If USE_RGB Then
    Public Const TB_BCKGRND_COLOR As String = "rgb(255, 255, 255)"
    Public Const TB_FONT_COLOR    As String = "rgb(48, 34, 38)"
#Else
    Public Const TB_BCKGRND_COLOR As String = "#FFFFFF"
    Public Const TB_FONT_COLOR    As String = "#302226"
#End If
Public Const TB_FONT_SIZE    As String = "11pt"
Public Const TB_PADDING      As String = "0.3em"
Public Const MAX_BRACKETS    As Long = 100
Public Const MAX_ROWS        As Long = 100
Public Const MAX_COL          As Long = 100

Enum FormulaSettings
    NotSet = -1
    AllFormulas = 0
    FirstCell = 1
    FirstCellInColumn = 2
    NoFormulas = 3
    UserDefined = 4
End Enum

---

idiotic! code tags doesn't keep format :( after edit

hm, now it works, weird :confused:

Hi there!











but this is mSettings not mBBcode :)

	A	B	C	D	E
1	Date	ID	Name	Company	Country
2	21/03/2018	16850307-6211	Felix Weiss	Sem LLP	Sierra Leone
3	18/04/2018	16300905-7245	Maggy Z. Cruz	Malesuada Augue Corp.	Tonga
4	02/08/2017	16910128-2987	Melyssa Hale	Mi Corporation	Liechtenstein
5	19/01/2018	16340924-6224	Beau E. Colon	Ultrices Iaculis Odio Corporation	Kazakhstan
6	01/06/2018	16490821-7609	Brenden Roach	Nulla Aliquet PC	Botswana
7	23/04/2017	16590903-0263	Ahmed U. Joyner	Nec Cursus LLP	Fiji
8	06/04/2019	16760811-7656	Signe Reilly	Suspendisse Ac Metus Limited	Uruguay
9	21/05/2017	16161112-9816	Candice G. Soto	Enim Limited	Cape Verde
10	06/08/2018	16301111-8365	Casey N. Rivas	Amet Limited	Nicaragua
11	29/11/2018	16600616-1431	Bevis Whitney	Pharetra Nibh Aliquam LLP	Ukraine
12	12/01/2019	16960108-3315	Ralph D. Andrews	Ultricies Ligula Corp.	Angola

doesn't matter ... It works !!! :)